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Introducing software 
testing the easy way! 


Why every developer needs Ghost — 
the exciting new tool for 
testing DOS software automatically! 


J 





& 


F YOU WANT TO 

GET the bugs out of 
your software and 
keep them out, Ghost 
is just what you’re looking for! It’s a 
breakthrough product that finally 
makes it practical for developers and 
testers like you to do extensive, 
repetitive regression testing 
throughout the entire development 
cycle - all automatically! 

That’s right. At last there’s an 
easy way to end the testing 
nightmare that’s been driving 
you crazy. No matter what 
language you program in, 

Ghost can help you deliver 
high-quality, reliable 
software without the 
hassle. We guarantee it! 

Ghost makes exact recordings 
of your software test sequences and 
screen displays, so you can rerun 
them and compare the results auto¬ 
matically whenever needed. Ghost 
will: 

♦ Document program errors au¬ 
tomatically. 

♦ Make testing grow more complete 
over time. 

♦ Shorten the critical integration 
and testing phase of develop¬ 
ment. 

♦ Lessen the chance of that “last- 
minute fatal bug.” 

♦ Make regression testing for new 
releases a practical reality. 


Meet Ghost Jr. 

Ghost Jr. is a limited-capability ver¬ 
sion of Ghost that provides full 
keyboard and screen recording, but 
has no playback capability. This 
low-priced version makes it practical 
to give copies to 
tb everyone who tests 

your product - even 
end users. All the 
problems they en¬ 
counter will be docu- 
. mented by Ghost 

] . scripts. Think of how 
[ ) this will speed up your 

' debugging and testing 

cycles! 



A The price 
1 is right and you 
don’t risk a thing! 

Ghost costs just $195 and comes 
with a 90-day money-back guar¬ 
antee. Ghost Jr. costs just $79 and 
steep quantity discounts are avail¬ 
able. Don’t miss this chance to end 
the tedium of software testing. Pick 
up the phone and order right now! 


Ghost 
at a glance. 

Ghost provides you with a way of 
making exact recordings of your 
software test sequences and screen dis¬ 
plays in a machine readable form. 

♦ 

You can then re-execute any set of 
tests at high speed without the man¬ 
ual labor that’s normally required. 

♦ 

You can interactively view all the dif¬ 
ferences found in the screen displays 
between the two runs, or have them 
printed out in a handy report. 

<» 

Requires no program changes 
or special hardware! 
,^^^^se^nl^ 61 ^Dinemory^^^. 


MONEY-BACK 

GUARANTEE 

If you’re dissatisfied with 
Ghost or Ghost Jr. for any 
reason, return them within 
90 days of purchase for a 
prompt, friendly, no-ques - 
tions'asked refund. 


TO ORDER 

or for more information, call toll-free: 
( 800 ) 848-1248 
International: (802) 848-7731 
Fax: (802) 848-3502 

Vermont Creative Software, Pinnacle Meadows 
Richford, VT 05476 U.S.A. 

Please mention Offer 144. 


Creators of Vermont Views 
with Designer 


©Copyright 1991 
Vermont Creative Software 


Ghost. So good at getting rid of the bugs, it’s scary. 
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C CODE FOR THE PC 

source code, of course 

NE W! Professional IDL (interface generator for complex data; multiple inheritance, ASCII and binary external forms, tools) .$400 

M++ (fast C++ math classes; indexing, matrices & vectors, numerics, memory handling, I/O; specify C+ + compiler/IUrbo, Zortech, Glock.) $395 

C++/Views (C++ interface to MS Windows 3.0; over 60 classes; free broswer (no source); no royalties; Zortech C++ only) .$395 

ZIP Image Processor & Victor Image Library Version 2.0 (brightness, contrast, merge images, TIFF/GIF/PCX/bin, HP ScanJet support) . . $290 

TUrboTj^v (Release 3.0; HP, PS, dot drivers; CM fonts; LaTjtX; MetaFont).$250 

db-File & db-Retrieve Bundle by Raima (B-tree and network database with SQL query and report writer, multi-user $475).$245 

TE Editor Developer’s Kit for Windows (full screen editor, undo command, multiple windows; inc. TER for application build-in; no royalties) $220 

NE W! C-pslib (PostScript generation library for C programs; includes complete graphics, font, rotation & paragraph support.$170 

Report Right (report writer and graph generator for Windows 3.0).$170 

C-Index/PC Database Library (fast B+ tree indexing, string/binary/custom keys, multiple record formats/file, 170-page manual) .$165 

Rogue Wfcve tools.h++ or math.h++ Class Library (extensive docs).each $165 

DJff Subroutine Libraries (toolkit for making AutoCAD DXF drawing files; includes manual & sample programs).$155 

WKS Library Version 2.01 (C program interface to Lotus 1-2-3, dBase, Supercalc 4, Quatro, & Clipper) .$155 

RED (program development editor for Microsoft Windows; keystroke recording & playback; unlimited undo) .$150 

Mina Operating System (Version 1.5; Unix-like operating system, includes manual; specify 5.25” or 3.5” diskettes).each $150 

Delorie GCC for MS-DOS (Version 1.39; includes C++, assembler & DOS extender; complete source code and makefiles).$150 

CGenerators (specify C, C++or Windows) .$140 

Vmem/C (virtual memory manager; least-recently used pager; dynamic expansion of swap file).$140 

CBIbee (B+tree ISAM driver, multiple variable-length keys) .$135 

TE Editor Developer’s Kit (full screen editor, undo command, multiple windows).$130 

C Communications Tbolkit by Magna Carta (multi-port & co-processor board support, FAX, interrupt driven, emulations, xfer protocols) . . $125 

C++ Object Library (virtual windows, I/O, lists, file free space management, keyed ISAM file I/O).$125 

SilverWhre "C” EMM Library (60 interface functions to EMM Version 4.0) .$120 

WinMem (unlimited global memory handles for Windows 3.0,4-byte overheadper block rather than 20, virtual memory for 286).$110 

Network Tbolbox/N (C functions for Novell Netware 2.1x, sample programs included).$110 

Updated! PC/IP (CMU/MIT TCP/IP for PCs; Clarkson drivers, SOS & SOSS NFS clones, Bdale mailer, PCRoute & PCBridge, NDIS, ODI, Beholder) . $100 

NE W! Heapman (application memory management for Windows 3.0; 64K bytes of heap space; includes memory browsewebugger) .$100 

PowerSTOR (Version 1.2; extended heap space on extended memory, expanded memory, and/or hard disk).$95 

MIRACL Multiprecision Integer & Rational Arithmetic C Library (nearly 100 functions; C & C+ +; from Ireland).$90 

Disassembler (8086/80286/80386/80086 with 80287/80387/80C187 NPX).$90 

Booter Tbolkit (floppy disk bootstrap routines, DOS file system, light-weight multitasking, windows, fast memory management) .$85 

VM4C (virtual memory manager for C; swaps blocks to disk; small, fast, simple) .$80 

VMEM (virtual memory manager by Blake McBride, Version 3.6, LRU pager, dynamic swap file, image save/restore).$80 

MultiDOS Plus (DOS-based multitasking, intertask messaging, semaphores).$80 

BGI Printer Driver Tbolkit (BGI drivers for Epson 9- & 24-pin, HP LaserJet II, & PaintJet printers).$75 

COMM-DRV (interrupt-driven serial communication, device drivers & serial port monitors; source for libraries only; complete source $200) . $75 

FlexUst (doubly-linked lists of arbitrary data with multiple access methods; specify C or C++).each $65 

Foundations-1 C++ Class Library (ASCII record I/O, bit arrays, exception handling, B-tree, persistent objects).$60 

C-LIN (linear algebra library; 42 vector & matrix functions; matrix inversion & decomposition; system-of-equations solution).$60 

MultiStr (evaluates a string containing multiple ASCII arithmetic expressions with variables).$60 

Coder’s Prolog (Version 3.0; inference engine for use with C programs).$60 

FinanC (large collection of financial function includingbond, inventory, stock portfolio, & cash flow).$55 

Pascal P-Code Compiler & Interpreter or Pascal-to-C Translator (Level 0 ISO standard Pascal with some Level 1 features) .each $50 

CALC (ASCII algebraic expression evaluator, unlimited parenthesis nesting, symbols, 32 built-in functions, easily extended).$50 

NE W! Mini IDL (interface generator for complex data; single inheritance, translator & table generator tools, ASCII external form only)).$50 

Backup & Restore Utility by Blake McBride (multiple volumes, file compression & encryption).$50 

Floppy TAR (TAR backup and restore on MS-DOS devices; direct access to non-standard devices) .$50 

C Compiler Pack (5 C compilers; 3 for 8086 (gcc, MicroC, Small C), 2 for 68000 (Sozobon, cc68); gcc ports include library source only) . . . $50 

GNUish MS-DOS (ports of 17 GNU programs to MS-DOS organized by Thorsten Ohl).$50 

SuperGrep (exceptionally fast, revolutionary text searching algorithm; also searches sub-directories).$50 

OBJASM (convert .obj files to .asm files; output is MASM compatible) .$50 

YATE (Yet Another Text Editor; written in C++, full-screen).$50 

CLIPS (rule-based expert system generator, Version 4.3; advanced manuals available at additional cost) .$50 

NIH Class Library & Book (basic C++ classes & Data Abstraction and Object-Oriented Programming in C+ + in softback by Keith Gorlen) $50 

Upgrade! Editor Pack (fourteen public domain editors; inc. microEmacs 3.11, Stevie, Elvis, Moke, mg2a, DTE, Jove, & Origami).$50 

Kier DateLib (all kinds of date manipulation; translation, validation, formatting, & arithmetic).$45 

DES Encryption & Decryption (2500 bits/second on 4.77 MHz PC for on-the-fly encryption at 2400 baud; domestic distribution only) .... $40 

RXC & EGREP Version 2.0 (Regular Expression Compiler and Pattern Matching; finite state machine from regular expression).$35 

Bison & BYACC (YACC workalike parser generators; documentation; no restrictions on use of BYACC output).$35 

PC-XINU (Comer’s XINU operating system for PQ.$35 

Spell Pack (6 spelling programs, a hyphenator, 2 utility packs and a 60K word list: Ispell, Microsp, Sp, Cspella, Spell, Dawg, Soundex) .... $30 

REGX Plus (search and replace string manipulation routines based on regular expressions).$30 

GNU Awk & Diff for PC (both programs in one package!.$30 

Updated! Crunch Pack (30 file compression & expansion programs).$30 

Updated! Make Pack (eight versions of Make including dmake 3.7, GNU Make, Cake, and Gymake and a makefile maker).$30 

BigNum (portable and efficient arbitrary-precision arithmetic package; hardcopy docs; from France).$25 

String Pack (lots of string routines; CH—p String class, BAWK, word wrap, fuzzy search, Boyer-Moore, Hypertext, etc.).$25 

NEW! UUPC Pack (UUCP for the PC; UUPC Version 1.10a by Wonderworks and smail/PC Version 2.5 by Stephen C. Trier).$25 

PC-MAIL (UUCP mailer by Wietse Z. Venema; send, receive, and manage UUCP mail; from Holland) .$25 

PERL for MS-DOS (C, sed, awk, and shell all rolled into one language; includes hardcopy docs).$25 

FLEX (fast lexical analyzer generator, new, improved LEX; BSD Version 2.3.6 with docs) .$25 

Using C++ Library (the code from the book by Bruce Eckel and then some; Zortech 2.0 compatible).$25 

Updated! XLISP 2.1 (includes Almy improvements).$20 

GNU Chess (GNU Version 3.1 & Windows Version 1.01; executable included; requires SDK to build; truly beautiful!).$20 

GNU RCS (FSFs version of the Revision Control System; like Unix’s SCCS only better; keeps track of software development).$20 

SDBM (fast, disk-based hash table manager for really large hash tables; clone of Unix ndbm ).$20 

NLMDL (non-linear least squares fitting in C+ +).$20 

Unix/386 

NEW! X-Winaows (client & server, shared library, Xlib, executables, XAW etc.; code isdiffson X11R4; TCP or same machine).$200 

Kyoto Common Lisp (Austin flavor, naturally; Version 1.530; includes GCC and Portable Common Loops (PCL)).$140 

GNU Emacs Version 18.55 (includes complete source & executables).$125 

Whffle BBS (interface to UUCP & B or C news; internal forums; files section; external processing; full USENET support).$120 

GNU C Compiler (gcc) Version 1.39 (includes complete source & executables).$100 

ViewComp Spreadsheet (internal termcap; printer output; hardcopy docs).$80 

GNU Debugger (gdb) Version 3.5 (includes complete source & executables).$60 

Gillespie Pascal-to-C (many flavors of Pascal handled; readable & maintainable output).$25 

Gosling Spreadsheet Pack (variants of the 1982 Gosling spreadsheet including PubliCalc and SC version 6.10; 1 MS-DOS variant).$25 

The Austin Code Works Voice: (512) 258-0785 

11100 Leafwood Lane FAX: (512) 258-1342 

Austin, Texas 78750-3587 USA E-mail: info@acw.com 

Free surface shipping for cash in advance For delivery in Texas add 7% MasterCard/VISA 
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OBJECT-ORIENTED PROGRAMMING 


Object-Oriented Windows Timers. 7 

An object-oriented solution to the Windows 16-timer limitation - in C, C++, or Pascal. 

Ron Burk 
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New Turbo Pascal for Windows 
Don't Leave DOS Without It! 



±U 


Go with Borland, the leader 
in OOP and Windows pro¬ 
gramming, when you’re head¬ 
ing for the Windows frontier. 

With Turbo Pascal® for 
Windows, your Windows 
applications will be faster 
and easier to create. 

Turbo Pascal for Windows 
includes Borland’s new 
ObjectWindows™ application 
framework FREE. So now 
you can develop Windows 
applications fast because they 
automatically inherit code 
for windows, menus, dialogs, 
controls, and more. 

Create Windows 
Applications for Less 

Turbo Pascal for 
Windows gives you 
more and costs you 
less than other 
Windows devel¬ 
opment systems. 

It’s designed exclu¬ 
sively for Windows 
programming, and 
everything you 

need is included in the one low price. You don’t 
need to buy the Microsoft® Windows Software 
Development Kit (SDK). 

Turbo Pascal for Windows is the easiest way 
to make your next program a Windows program. 


Edit Search Bun Compile Options Window Help 


d:\tpwintewldem03\sysinfn.pns 


d:\tpwin\nwldemos\gdidemn.pas 


d:\tpwin\owldemos\mfileapp.pas 


program MDIFileEditor; 

<$R MFILEAPP.RES} 

<$N 4096, 4096} 
uses UObjects, WinTypes, UinProc* 
type 

{ Declare TMDIFileApp, a TAppli 
TNDIFileApp - objectfTApplicati 
procedure InittlalnUindoM; uir 


11.2 


Insert 


sir 

Program Manac 





About Turbo Pascal 





▲ Create Windows Applications in Windows. The Windows 
Integrated Development Environment (IDE) lets you create, 
edit, compile and run your programs, all from within Windows. 

◄ Create Windows Resources Visually. Using the Resource 
Toolkit, you can visually create your Windows user interfaces 
without programming. 


See Your Dealer Today or Call 
1-800-331-0877 Now. 

Current owners of Turbo Pascal, 
call Borland 
for a special offer!* 

BORLAND 

The Leader in Object-Oriented Programming for Windows and DOS 

•Offer good in U.S. and Canada only. Copyright ® 1991 Borland Bl 1396 


I 
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From 

The Editor 


In the September, 1989 issue of Computer Language, Edward Yourdon 
wrote a column entitled “Of Books and Bibles." In this column, he included 
this mid-1970s quote from Karl Karlstrom (an editor at Prentice-Hall): “If you 
added up all the copies of all the computer-related books that have ever 
been written, it would be less than the number of people employed in the 
software field.” Of course, that was before the rise of the PC, but Yourdon 
believes that, putting aside introductory PC books, the ratio of books to 
programmers is probably about the same today. 

I reread that quote several times because it seemed unbelievable. Upon 
reflection, however, I found it more believable. I remembered that 1 owned 
no software books (except the required Fortran and Pascal language refer¬ 
ences) during my first year as a programmer. For a couple of years after 
that, the only software books I owned were Software Tools and The Ele¬ 
ments Of Programming Stgle (both by Kernighan and Plauger). It was not 
that 1 had no interest in such books, but that I was, like many programmers 
I run into these days, simply not aware of what was available. 

In the past five years, I've made up for my computer illiteracy with a 
vengeance. My tax records show I paid $1,184.33 for computer books and 
magazines last year. It is a little sad to read a good computer book and 
know that it is destined for a very limited audience. For that reason, I would 
like to pay a small homage to one good little book that was not successful. 

Microprocessor Programming for Computer Hobbyists, by Neil Graham 
was published in 1977 by TAB books. I accidentally ordered it back when I 
was an electrical engineer, not a programmer. Since I had never seen a 
computer in 1977, I put the puke-green book with the ugly gold lettering 
on the bottom shelf, out of sight. Some years after I became a programmer, 
the book caught my eye and I opened it to discover a treasure trove of 
clearly-explained algorithms for everything from floating-point arithmetic to 
external sorting. I still turn to this book when I want to remember how 
algorithms like Shell sort or Quicksort work. I can't imagine that this mis- 
titled book ever sold many copies and I don’t know what Neil Graham is 
doing today, but I hope he didn’t stop writing computer books. 

Have you discovered a “great unknown” software book? Write me a let¬ 
ter about it. Maybe we can raise the average to two computer books for 
every programmer. 


Ron Burk 

Editor 
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9:10. If you can imagine it, you can prototype it fhst. 
With IbolBookh drawing tools. 


9:35. Create, size and move fields to get exactly what 
you want without a line of code. 




9:45. Buttons and hotwords establish links to other 
pages and documents. Even to other applications 
through DDE. 


10:15. OpenScript is a lull-featured OOP language 
with built-in syntax checker and debugger. 


10:58. Finished. An elegant solution quickly and 
easily. Next? 


Something for people 
who watch the clock. 


Software scheduling used to happen on a calendar. 

Now you can do it on a watch. 

Introducing ToolBook® 1.5. The software construction set that lets 
developers build Windows® programs faster than you can say C++. 

ToolBook’s graphical programming features enable you to quickly 
create prototypes. Instead of writing pages of complex code to create a 
screen, just draw the screen. Instead of time-consuming.exercises to 
change the screen.you simply click and drag. Instead of weekends at the 
office, spend them at home reading your favorite computer magazines. 

ToolBook includes OpenScript? An OOP language that has the 
muscle and agility you’re looking for in a serious development tool. Plus 
a built-in syntax checker and debugger to find and fix problems faster. 

Is there a limit to how complex you can get with something that 
works this easily? Yes. We’re just not sure what it is. Because if you can 
think of it, you can use ToolBook to create it. 

In fact, you can make it come alive.ToolBook’s Script Recorder 
creates animation sequences with a simple point and click. 

ToolBook offers other sophisticated graphical capabilities, too. You 
can take advantage of a whole range of colors, a cliprart library and 



graphics from other Windows applications. Even import 256-color 
bitmap images up to 1 megabyte in size. 

You can link ideas any way you want, too.ToolBook’s hypemavigation 
features let you make the connections. Once they’re made, you can go 
deeper and deeper into large volumes of information. Just by clicking 
ahotword or a button. 

You can extend OpenScript with Dynamic Link Libraries, which 
are created in other programming languages. So ToolBook is ideal for 
putting a graphical interface on your mission-critical applications. 

ToolBook also supports Dynamic Data Exchange, which allows you 
to build solutions by integrating multiple Windows applications. 

And just to get you up and running quicker,ToolBook comes with 
a suite of sample applications with all scripts intact. Incorporate 
them. Or take them apart. But you don’t have to start from scratch. 

If you’re interested in learning more, call 1 (800) 624-8999, Ext. 299R 
and ask for a brochure and the name of your authorized dealer. For 
international inquiries, send a fax to (206) 454-0672 requesting inter¬ 
national information. 

Then prepare for a time change. 


TOOLBOOK 

Software Construction Set For Windows 

HO-llOth Ave.. N.E., Suite 717, Bellevue, WA 98004 


Asymetrix,ToolBook and OpenScript are registered trademarks of Asymetrix Corporation. Windows is a trademark of Microsoft Corporation. Where indicated, 
product and company names are trademarks/registered trademarks of their respective holders. 
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GRAPHICS TOOLS 
THAT SCALE NEW HEIGHTS 


The true 3-D Charts, Data Entry Windows, 

List Boxes, and Help Screens pictured above 
are just the beginning. Below the surface you 
will find the two best collections of graphical 
programming tools available. 


ESSENTIAL GRAPHICS LIBRARY™ 


The Complete C Graphics Function 
Library 

The Essential Graphics Library is an extremely 
fast, powerful and reliable tool kit for creating 
today's demanding graphics applications. This 
complete graphics function library contains a 
full line of drawing and graphing tools, 
including true 3-D charting functions with world 
coordinates and viewports. 



Add desktop publishing capabilities to your 
applications using built-in functions for font 
rotation and manipulation, along with PCX/PCC 
output. The library includes 12 bit mapped 


and 12 vector vector fonts and supports other 
font packages. 

Compare these features: 

• 3-D Bar, Pie, & Pyramid Charts 

• 2-D Line, Scatter, High-Low-Close, & Bar 
Charts 

• Super VGA, 8514, VGA, EGA, Hercules, 

& CGA Support 

• Full Mouse Support 

• Font Rotation & Scaling 

• PC Paintbrush, PCX/PCC Image Support 

• Dot Matrix, HP Laser and Plotter Output 

If you are looking for a fast, reliable, well 
documented and fully supported library of C 
graphics tools, you just found it. 

Graphical User Interface Dialog Objects 


GUIDO™ 


Advanced Tools for Object 
Oriented Graphics Programming 

GUIDO is the object oriented C programming 
tool kit for creating today’s graphics based 
user interfaces. GUIDO’s Graphical User Inter¬ 
face Functions, with over a dozen predefined 
high level object types, supplies all menus, 
windows, boxes, buttons, and cursors. The 
Graphical User Environment provides an event 
driven, object oriented domain with full mouse 
and keyboard support, graphical screen 
handling and window overlap priority. Add mul- 
□ Request 317 on Reader Service Card □ 
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tiple hot regions to each window and overlap 
an unlimited number of windows and objects. 

No additional graphics library is required. All 
low level functions are included. GUIDO comes 
with a comprehensive manual with demo code 
and examples. 

Compare these features: 

• Pop-Up and Pull-Down Menus 

• Vertical and Horizontal Menus 

• Data Entry Objects 

• List Boxes and Scroll Bars 

• Radio Buttons 

• Boolean Objects 

• Pop-Up Text Windows and Percent Bars 

• Custom GUI Objects 

• Full Mouse and Keyboard Access 

If graphic based object oriented programming 
is where you are headed, GUIDO will guide you 
to the top of the applications peak. 



Order your copies today: EGL: $399 
($1399 with Source); GUIDO: $249 ($499 
with Source). Try them for 30 days. If you 
are not completely satisfied return them in 
the original packaging for a full refund. 

To Order Call 1-800-451-6174 

Six more essential programming tools from 
South Mountain: C Utility Library™, Essential 
Communications ™, Breakout-II ™, /‘resident_C’/ TU , 
and Hold Everything™. All libraries include support 
for Microsoft C/Quick C and Borland Turbo C. 



SOFTWARE 


SOUTH MOUNTAIN SOFTWARE 

has supplied the highest quality, 
mast tip to date C programming tools 
and libraries for over five years. 
Every produrt tomes with a 30 day, 
money bark, guarantee. We provide 
free telephone support from exper- 
iented programmers, and you never 
pay a run-time fee or royalty to 
South Mountain. Our goal is simple, 
to give you the best C programming 
tools on the market today. 
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Object-Oriented 
Windows Timers 


Ron Burk 


One way to illustrate object-oriented programming is to transform a proce¬ 
dural design into an object-oriented design. This article shows you how to build 
an object-oriented interface to Windows timers in three different languages: C, 
C++, and Turbo Pascal for Windows (TPW). This design removes the Windows 
16-timer limitation by providing an unlimited number of timers from a single 
Windows timer. If you know C++ but not Turbo Pascal or vice versa, this exer¬ 
cise will acquaint you with the object-oriented facilities of another language. 

The code in this article is as compiler-independent as possible. The C code 
was tested with Zortech C v2.18, Microsoft C v6.0, and Borland C v2.0. The C++ 
code was tested with Zortech C++ V2.18 and Borland C++ V2.18. The TPW code 
was created with the initial release of TPW. All the testing was done with the 
small memory model. 

Windows Timers 

The Windows programming environment is event-driven, so almost every 
action your Windows program takes should be in response to some event. Most 
events are caused by the user. For example, the user might click on a menu 
item, causing your program to receive an event that tells it to save a file. On 
the other hand, your program may need to perform tasks that are not initiated 
directly by the user. For example, an editor might want to make a file backup 
every 60 seconds. You can make such tasks event-driven by using Windows 
timers. 

A Windows timer is an event that Windows generates at periodic intervals 
(you specify the interval when you create the timer). You can elect to receive 
the events from a timer in one of two ways. You can associate a timer with a 
window and have Windows post a UM_TIMER message for that window every 
time the timer fires. Alternatively, you can associate a callback function (a func¬ 
tion in your program that is callable by Windows) and Windows will call that 
function at each timer event. The sidebar describes the Windows 3.0 API for 
timers. 

One confusing thing about this API is that Windows associates two kinds of 
event IDs with timers. Internally, Windows always associates an ID with each 
system timer; that is the event ID returned by SetTimer() when you create a 
timer. If you associate a timer with a window, you can also assign that timer 
your own event ID to distinguish it from any other timers you associate with 
the same window. That event ID can be any integer you like, as long as you 
haven't already assigned it to a timer associated with the same window. When 
the timer event occurs, Windows passes the event ID you assigned to the timer 
to your application (either via a callback function or a UM_TIMER message). 


Ron Burk has a B.S.E.E. from the University of Kansas and has been a 
programmer for the past 10 years. You may contact him at Burk Labs, P.O. Box 
3082, Redmond, WA 98073-3082. 
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Timer 


EventID 


Fire( ) 


Figure 1 

Class name 
Data members 
Function members 


A Notation for Describing a Class 



Figure 2 



r Timer ^ 


EventID 

LastTime 

ThisTime 

Interval 

Fire 

Start(lnterval) 
l Stop J 

The Basic Timer Class 


When you call KillTimer(), you identify the timer you 
want to delete by passing the correct event ID. If you original¬ 
ly associated the timer with a window, you must pass Kill- 
Timer() the event ID you assigned to the timer. If you did not 
associate the timer with a window, you must pass Kill- 
Timer () the Windows event ID that the original call to Set- 
Timer() returned. 

Windows timers are not asynchronous. It is quite possible 
to create a one-second timer that does not fire for several 
seconds because the application window is being moved or 
another application is hogging the CPU. Because windows 
multitasking is not pre-emptive, you can’t do much about this.' 
If you keep track of the time the timer last fired, you can at 
least determine the number of lost events by subtracting that 
time from the current time and dividing by the timer interval. 

Windows timers are a scarce resource. Windows 3.0 sup¬ 
ports only 16 timers and that is a system-wide limitation. In 
other words, if application A needs nine timers and application 
B needs eight timers, you can’t run both applications at the 
same time. A less severe limitation is the fact that SetTimer() 
uses an unsigned int to specify the timer interval. That 
means the longest timer interval you can set is 65,535 mil¬ 
liseconds, or about 66 seconds. 

Designing A Timer Object 

The classic question of object-oriented programming is: 
What makes a good class? Some programmers are disap¬ 
pointed to find that there is no set of rules that defines the 
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The Windows 

3.0 Timer API 

SetTimer - Create a timer event 

WORD FAR PASCAL 

Syntax: 

FuncName(HWND WindowHandle, 

WORD MessageNumber, 

WORD 

int Eventld, DWORD FunctionPtr); 

SetTimer(HWND Window- 

Handle, 

The Microsoft Windows SDK incor- 

int Eventld, 

rectly claims the last argument to 

WORD Interval, 

the callback function contains the 

FARPR0C 

current system time. 

Call Back); 


KillTimer - delete a timer event 

Where: 

WindowHandle - 

Syntax: 

is NULL or else identifies the 

BOOL 

window to be associated 

KillTimer(HWND WindowHandle, 

with this timer. 

int EventID) 

Eventld - 

Where: 

is a non-zero integer that 

distinguishes multiple timers 

WindowHandle - 

associated with the same 

is the window handle passed 

window. 

to SetTimer() to create 

Interval - 

this timer. 

J 

specifies the timer interval, 

Eventld - 

in milliseconds. 

is either the event ID passed 

CallBack - 

to SetTimer() to create this 
timer or (if WindowHandle is 

is NULL or else specifies the 

NULL) the event ID returned 

function that will be called 

by SetTimerf). 

when the timer event occurs. 

SetTimer() - 

KillTimerO - 

returns non-zero if the event 

returns an integer that 

was deleted and zero 

uniquely identifies the system 

if no such timer event existed. 

timer event created. 


Description: 

Description: 

SetTimer() creates a system 

KillTimerO deletes a timer 
event that SetTimer() created. If 

timer event Every Interval mil- 

the timer was not associated with 

liseconds, Windows invokes the 

a window, then you must pass 

callback function or (if Cal IBack is 

KillTimerO the event ID that 

NULL) posts a WM_TIMER message 

SetTimerO returned. □ 

for the specified window to the ap¬ 
plication event queue. If a callback 
function is specified, it must be 
declared as follows: 
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get source code, complete sample 
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reference manual with extensive 
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classes that are correct for a given set 
of requirements. Object-oriented 
programming is still programming, so a 
good design is still the result of thought, 
trial, and experience, and more than 
one good design is possible for any 
problem. The old advice to "build one 
to throw away" is as valid with object- 
oriented programming as with any 
other style. You shouldn’t expect your 
first design to be optimal. This section 
describes the process I went through to 
arrive at a design for a timer. 

The Windows timer API crams too 
many ideas into one pair of functions. It 
supports two kinds of event IDs and 
two kinds of event actions. I decided to 
start with a simpler model that as¬ 
sociates a single event ID (a user- 
specified integer) and a single action 
(calling a function) with each timer. That 
decision is the beginning of a class 


design. A class is an association of data 
and functions. I've already decided that 
the timer class has at least one data 
member (the event ID) and at least one 
function member (the callback function). 
Figure 1 shows a simple notation (bor¬ 
rowed from Coad and Yourdon) to 
describe the major features of a class. 
This figure assumes that you will 
specify an event ID when you create a 
timer object. 

The class in Figure 1 is a start, but it 
does not explain how you specify the 
event interval of a timer. With the Win¬ 
dows API, you specify the event interval 
when creating the timer and you can't 
change it after that. To change the in¬ 
terval of a timer, you must delete it (by 
calling KillTimerO) and then create a 
new one (by calling SetTimerO) with 
the desired interval. I preferred to 
separate the creation and deletion of 


timers from any of their other functions. 
Therefore, I added member functions to 
start a timer (specifying the event inter¬ 
val) and stop a timer. If you want to 
change a timer's event interval, you just 
call the Start () function again with a 
different interval. 

I also added some data members 
besides the event ID. As discussed pre¬ 
viously, you must do some calculation if 
you want to account for any lost timer 
events. That calculation requires the 
time of the previous timer event, the 
current time, and the timer interval, so I 
added those three data members to 
the class, as shown in Figure 2. Ignoring, 
for the moment, object creation and 
deletion and error handling, Figure 2 is 
the finished design for a basic timer 
class. After you create a timer (specify¬ 
ing an event ID), it does nothing until 
you call the StartQ function and 
specify an event interval. Then, the 
timer calls the Fire() function every 
time the event interval expires. You can 
change the interval at any time by 
recalling the Start () function, or stop 
the timer by calling the Stop() func¬ 
tion. You always have access to the 
event ID, the event interval, the next- 
to-the-last time the timer fired (Last- 
Time), and the very last time the timer 
fired (ThisTime). 

Implementing 
The Timer Class 

The class design in Figure 2 
describes what the class user will see. It 
leaves unspecified, however, many 
details of implementation. Different im¬ 
plementations may satisfy the same 
design. In fact, part of the point of the 
class design is to provide an interface 
that can stay the same even if the im¬ 
plementation changes. 

Several reasonable criteria exist for 
making implementation decisions for 
the timer class. If you expect to create 
a great many timers, then you would 
want an implementation that minimizes 
the size of each timer. If you expect to 
start and stop timers very frequently, 
then you would try to optimize timer 
creation and deletion. I chose an im¬ 
plementation that requires the fewest 
possible timer events from Windows. 



Figure 3 
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Multiplexing A Timer 

To avoid using up system timers, 
you can multiplex a single timer. For ex¬ 
ample, suppose your program needs a 
one-second timer, a five-second timer, 
and a one-minute timer. You could 
simulate these three timers with a 
single one-second Windows timer 
whose callback function checks to see 
which timer events are overdue and 
generates the appropriate events. This 
requires each timer to be represented 
by a data structure that contains the 
timer interval, the time it last fired, and 
information to specify what is supposed 
to happen when it fires (for example, a 
function to call or a window to post a 
message to). 

Once you write the code to multi¬ 
plex a single Windows timer, it is easy 
to also allow timer intervals longer than 
65.535 seconds and the ability to 
change timer intervals on the fly. If you 
use a long to record the timer interval, 
that allows intervals of up to many 
years. Changing the timer interval is as 
easy as changing the appropriate field 
in the timer data structure. 

When multiplexing a single timer, 
you must decide how to select the in¬ 
terval of the Windows timer. One solu¬ 
tion is to run the Windows timer at the 
fastest possible rate, 55 milliseconds, so 
it is guaranteed to be at least as fast as 
the fastest timer it must simulate. That 
solution is simple, but a bit inefficient, 
since windows msut generate a timer 
event every 55 milliseconds, even if you 
are simulating a single one-minute 
timer. 

The code in this article provides a 
different solution, by always using the 
largest Window timer interval possible. 
For example, if you request a single 30- 
second timer, then the timer package 
should request a 30-second timer from 
Windows. If you then request a 20- 
second timer, the timer package should 
kill the 30-second timer and create a 
10-second Windows timer, that it then 
multiplexes to simulate the two timers 
requested. Ten is the greatest common 
divisor (GCD) of 30 and 20, so a 10- 
second timer is the slowest that can be 
used to simulate both a 20-second 
timer and a 30-second timer. 

Calculating the GCD of the simulated 
timers gives exactly the slowest Window 
timer interval needed. Handling intervals 
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Listing 1 (ctimer.h) 

#ifndef TIMERS_H 
#define TIMERS_H 

typedef unsigned long ULONG; 

typedef void (‘TIMER_FIRE)(struct TIMER *); 

typedef struct TIMER 
{ 

struct TIMER ’Next; 
int Eventld; 

ULONG Interval; 

ULONG ThisTime; 

ULONG LastTime; 

TIMER_FIRE Fire; 

} TIMER; 

void InitTimerPackage(HANDLE Instance, TIMER_FIRE Func); 

TIMER ‘TimerCreate(int Eventld); 

void TimerDelete(TIMER ‘Timer); 

int TimerStart(TIMER *Timer, ULONG Interval); 

void TimerStop(TIMER ‘Timer); 

#endif 

/* End of File */ 


A C Interface to Timer Objects 


Listing 2 (timer.h) 

lifndef TIMERS_H 
Idefine TIMERS_H 

typedef unsigned long ULONG; 

class TIMER 
( 

public: 

TIMER(int Eventld); 

virtual ~TIMER(); 

int Start(ULONG Interval); 

void Stop(); 

virtual void Fire() * 0; 

int Eventld; 

ULONG Interval; 

ULONG ThisTime; 

ULONG LastTime; 

static void InitTimerPackage(HANDLE Instance); 
static int OutOfTimers(); 

friend int Reviselnterval(); 

friend void InitTimer(TIMER ‘Timer, int Eventld); 
friend void DeleteTimer(TIMER ‘Timer); 
friend WORD FAR PASCAL TimerCallBack(HWND, 

WORD, WORD, LONG); 

private: 

TIMER ‘Next; 

); 

lendif 

/* End of File */ 


A C++ Interface to Timer Objects 


larger than 65,535 causes a problem, though. For example, if 
you start a single, 90-second timer, ideally the timer package 
would select a Window timer interval of 45,000 milliseconds. 
45,000 is the greatest divisor of 90,000 that is less than 65,535. 
Unfortunately, I couldn't come up with an efficient algorithm 
that calculates the greatest divisor less than a given number 
(large prime numbers caused problems). I chose a heuristic 
solution of dividing the interval by two until it is less than 
65,535, then rounding to the nearest second. 

This method does add some overhead to starting and stop¬ 
ping timers. When a timer starts or stops, the timer package 
must calculate a new GCD and (if it is different), kill and restart 
the Windows timer being multiplexed. If you are starting a 
new timer, you only have to figure the GCD of its interval and 
the current Windows timer interval. If you are stopping a 
timer or changing the time of an existing timer, however, you 
must make a pass over all the active timers, calculating their 
GCD. The overhead is not likely to be significant unless you 
have many timers and you start and stop them frequently, in 
that case, the 55-millisecond resolution of Windows timers is 
likely to be more of a problem than the overhead of the timer 
package. 

The algorithm I chose to multiplex the Windows timer has 
some subtle effects on timer behavior. Figure 3 shows what 
happens if you start a one-second timer and then start 
another one-second timer shortly after the first. More than 
one second elapses before the second timer fires for the first 
time. Also, once they are both firing, both timers fire at the 
same time, even though they were started at somewhat dif¬ 
ferent times. Both effects are caused by the fact that a timer 
is only fired when the Windows timer fires, and then only if 
the time elapsed since the timer last fired (or was started) is 
greater than the timer interval. 

A C Implementation 

Listing 1 (CTIMER.H) contains the header file that defines 
the interface to a C implementation of the timer class. The 
interface consists of a data structure and five functions. You 
initialize the timer package by passing it your instance handle 
(needed to set up the Windows timer callback function), and 
the function you want to be called when timer events occur. 
You call TimerCreate() to obtain a timer that contains a 
specific event ID and you use the other three functions to 
delete, start or stop a timer. 

The interface defined by Listing 1 is quite different than the 
Windows timer API. Still, it looks like reasonable C code. About 
the only thing most C programmers would find surprising is 
the fact that the pointer to the fire function doesn’t reside in 
the TIMER data structure. Instead, there is one pointer that 
serves all the TIMER objects. In C, that makes it inconvenient 
to define a new kind of TIMER that has a different fire func¬ 
tion. I did it that way to illustrate how the same design in C++ 
or TPW is easier to extend. 

If the package cannot obtain a timer from Windows, it calls 
0ut0fTimers(). If that function returns TRUE, then it fails, 
otherwise it calls SetTimer() to try again. The default version 
of OutOf Timers () just returns TRUE, but you can replace it 
with one that gives the user a chance to shut down some 
other application that is using up all the timers. 


Page 12 - TECH Specialist 


July 1991 





Listing 3 (timers.pas) 


unit Timers; 
interface 

uses WinTypes.WObjects; 
type 

PTimer » ''TTimer; 

TTimer = object 

LastEvent : Longint; 

ThisEvent : Longint; 

Eventld : integer; 


constructor 

constructor 

destructor 

function 

procedure 

procedure 

function 

{static} 

function 

private 

Next 

Interval 

function 

function 

function 

end; 


InitEvent(EventId_:integer); 

Init; 

Done; virtual; 

Start(Newlnterval:Longint):boolean; 

Stop; 

Fire; virtual; 

Getlnterval:Longint; 

OutOfTimers:boolean; virtual; 

: PTimer; 

: Longint; 

Setlnterval(Newlnterval:Longint): boolean; 
Reviselnterval:boolean; 

SetBaselnterval(Interval_:Longint)rboolean; 


PWindowTimer 

TWindowTimer 


■ ''TWindowTimer; 

* object(TTimer) 

WindowHandle: PWindowsObject; 
constructor Init(WindowHandle_:PWindowsObject); 
constructor InitEvent(WindowHandle_ 
:PWindowsObject; 

Eventld_:integer); 
procedure Fire; virtual; 
end; 

function TimerGetlnterval :Longint; 


{■ 


implementation 
uses WinProcs; 
var 

ActiveCount : integer; 

TailPtr : PTimer; 

Timerld : integer; 
IntervalGcd : Longint; 

Call Back : TFarProc; 

const 

TIMER_MAX_RESOLUTION 
= 65535; 

TIMER_MIN_RESOLUTION 
= 55;~ 

{ Gcd - Greatest Common Divisor } 
function Gcd(a,b:Longint):Longint; 
var 

Remainder : Longint; 
begi n 

Remainder a; 
if (a = 0) or (b = 0) then 
Gcd := 0 


A TPW Timer Object 
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Listing 3 

— Cont’d 

else 

KillTimer(0, Timerld); 

begin 

Timerld 0; 

Remainder :* b mod a; 

IntervalGcd := 0; 

while Remainder <> 0 do 

end 

begin 

else 

b := a; 

Reviselnterval; 

a :* Remainder; 

end 

Remainder := b mod a; 

( else if starting a timer ) 

end; 

else if TimerlsOn and not(TimerWasOn) then 

Gcd :* a; 

begin 

end; 

Interval := Newlnterval; 

end; 

if Newlnterval > TIMER MAX RESOLUTION then 

function TTimer.SetBaselnterval(Interval :Longint):boolean; 

Result := Reviselnterval 

else 

var 

Result := SetBaselnterval(Newlnterval); 

Newlnterval : Longint; 

if Result = TRUE then 

TempReal : real; 

ActiveCount := ActiveCount + 1; 

Finished : boolean; 

end 

begin 

{ else if changing timer interval ) 

SetBaselnterval := TRUE; { Assume success } 

else if TimerlsOn and (Newlnterval <> Interval) then 

if IntervalGcd <> 0 then 

begin 

Newlnterval := Gcd(IntervalGcd, Interval ) 

Interval := Newlnterval; 

el se 

Result := Reviselnterval; 

Newlnterval := Interval ; 

end; 

if Newlnterval < TIMER MIN RESOLUTION then 

if Result = TRUE then 

Newlnterval := TIMER MIN RESOLUTION; 

begin 

if Newlnterval > TIMER MAX RESOLUTION then 

Interval Newlnterval; 

( Use heuristic to get "nice" interval } 

if Newlnterval > TIMER MAX RESOLUTION then 

begin 

Result := Reviselnterval; 

while Newlnterval > TIMER MAX RESOLUTION do 

end; 

Newlnterval := Newlnterval div 2; 

Setlnterval := Result; 

Newlnterval := (Newlnterval div 1000) * 1000; 

end; 

end; 

if Newlnterval <> IntervalGcd then 

function TTimer.Start(NewInterval:Longint):boolean; 

begin 

begin 

if Timerld <> 0 then 

if Setlnterval(Newlnterval) <> FALSE then 

KillTimer(0, Timerld); 

begin 

Timerld := SetTimer(0, 0, Newlnterval, 

ThisEvent := GetTickCount; 

Call Back); 

LastEvent : = ThisEvent; 

repeat 

Start := TRUE; 

Finished := TRUE; 

end 

if (Timerld = 0) then 

else 

if OutOfTimers ■ TRUE then 

Start := FALSE; 

begin 

end; 

Timerld := SetTimer(0, 0, 

Newlnterval,Cal 1 Back); 

procedure TTimer.Stop; 

Finished FALSE; 

begin 

end; 

Setlnterval(0); 

until Finished; 

end; 

if Timerld ■ 0 then 

SetBaselnterval : = FALSE 

procedure TTimer.Fire; 

else 

begin 

IntervalGcd := Newlnterval; 

Abstract; { User must redefine Fire function ) 

end; 

end; 

end; 

function TTimer.Setlnterval (Newlnterval : Longint):boolean; 

function TTimer.OutOfTimers:boolean; 
begi n 

var 

OutOfTimers := FALSE; ( Give up ) 

TimerWasOn, TimerlsOn, Result 

end; 

: boolean; 

begin 

constructor TTimer.Init; 

Result :• TRUE; ( Assume success ) 

begin 

TimerWasOn := Interval <> 0; 

TTimer.InitEvent(O) ; 

TimerlsOn := Newlnterval <> 0; 

end; 

{ If deactivating timer ) 

constructor TTimer.InitEvent(EventId :integer); 

if TimerWasOn and not(TimerlsOn) then 

begin 

begin 

if TailPtr = NIL then 

ActiveCount := ActiveCount - 1; 

begin 

if ActiveCount » 0 then 

TailPtr := OSelf; 

begin 

Next @Self; 
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Listing 3 — Cont'd 

end 

else 

begin 

Next := TailPtr^.Next; 

TailPtr^.Next := @Self; 

TailPtr := @Self; 

end; 

LastEvent := 0; 

ThisEvent := 0; 

Interval := 0; 

Eventld := Eventld_; 

end; 

function TTimer.Getlnterval :Longint; 

begin 

Getlnterval := Interval; 

end; 

function TTimer.Reviselnterval iboolean; 

{ 

Reviselnterval recalculates the greatest common 
divisor (gcd) of all the timers in the linked 
list. If the gcd has changed, Reviselnterval 
resets the Windows timer by calling Setlntental. 

} 

var 

Rover 

: PTimer; 

Newlnterval 
: Longint; 

begin 

Rover :* TailPtr; 

Newlnterval := 0; 
repeat 

Rover :* Rover^.Next; 
if Rover''. Interval <> 0 then 
if Newlnterval = 0 then 

Newlnterval := Rover''. Interval 

el se 

Newlnterval := Gcd(NewInterval, 

Rover''. Interval); 

until Rover ■ TailPtr; 

IntervalGcd := 0; 

Reviselnterval := SetBaselnterval(Newlnterval); 

end; 


destructor TTimer.Done; 
var 

Rover, Previous 
: PTimer; 

begin 

Rover := TailPtr; 

Previous := NIL; 

repeat 

if Rover''.Next ■ @Self then 
Previous :■ Rover; 

Rover := Rover''.Next; 
until Previous <> NIL; 

if Previous*.Next = Previous then 
TailPtr := NIL 

else 

begin 

if Previous''.Next = TailPtr then 
TailPtr := Previous; 

Previous*.Next := Previous*.Next*.Next; 
end; 

Setlnterval(0); { in case timer was active } 

end; 


The implementation of this C timer package is in Listing 4 
(CTIMER. 0- To reduce the number of listings for this article, I 
tried to reuse as much code as possible between the C and 
C++ implementations. That common code is in Listing 6 (COM¬ 
MON. C). 

A C++ Implementation 

Listing 2 contains the definition of a C++ interface for the 
same timer design. The C++ class declaration allows you to 
explicitly associate the data structure with the functions that 
are allowed to operate on it. The first two functions in the 
class are the constructor (corresponds to TimerCreateO) and 
the destructor (corresponds to TimerDelete()). You can use 
the C++ new operator to dynamically allocate a new timer 
and the delete operator to delete such a timer. 

The static member functions are functions that must have 
access to class data, but can be called without using the ob¬ 
ject.func() syntax. For example, InitTimerPackagef) must 
be called before any timers exist, but I want it to be a mem¬ 
ber function so that its relationship to the TIMER class is clear 
(and so it can access any static data of the class). 

The Fire() function is virtual in this declaration, so you 
can redefine it. In fact, the = 0 after the Fire() function 
makes this an abstract class, which means you must redefine 
it. Because this is an abstract class, the compiler will not let 
you create any instances of it! To use this class, you define 
your own timer class that inherits from the TIMER class and 
redefines the Fire() function. Here's how easy that is: 
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Listing 3 — Cont'd 

Setlnterval(0); { in case timer was active } 

end; 

constructor TWindowTimer.Init(WindowHandle_:PWindows- 

Object); 

begin 

TWindowTimer.InitEvent(WindowHandle_, 0); 

end; 

constructor TWindowTimer.InitEvent(WindowHandle_:PWindows- 
Object; 

Eventld_:integer); 

begin 

TTimer.InitEvent(EventId_); 

Wi ndowHandle := WindowHandle_; 

end; 

procedure TWindowTimer.Fire; 
begin 

if not(PostMessage(WindowHandle A .HWindow, wm_Timer, 
Eventld, 0)) then 

SendMessage(WindowHandle A .HWindow, wm_Timer, 
Eventld, 0); 
end; 


function InternalTimerCallBack(WindowHandle :HWnd; 

MessageNumber :WORD; 

Eventld :integer; 

Dummy :TFarProc) 

:W0RD; export; 
var 

Time : Longint; 

Rover : PTimer; 

begin 

if TailPtr <> NIL then { Sanity check ) 
begin 

Rover := TailPtr; 
repeat 

Rover := Rover 7 '.Next; 
with Rover' do 
begin 

if Interval <> 0 then 
begin 

Time := GetTickCount; 
if (Interval + ThisEvent) <= Time then 
begin 

LastEvent := ThisEvent; 

ThisEvent := Time; 

Fire; 

end; 

end; 

end; 

until Rover ■ TailPtr; 
end; 

end; 

function TimerGetlnterval :Longint; 
begin 

TimerGetlnterval := IntervalGcd; 

end; 


( Initialization code for Timers unit. } 
begin 

Timerld := 0; 

ActiveCount := 0; 

IntervalGcd := 0; 

Call Back := MakeProcInstance( 

@InternalTimerCallBack,HInstance); 

end. 

( End of File ) 


class MyTimer : public TIMER { 
public: 

MyTimer(int Eventld) 

:TIMER(EventId){} 
virtual void Fire() 

{ MessageBeep(O); } 

}; 

You can then create MyTimer timers, and each one beeps 
every time it expires. When you need a different timer func¬ 
tion, you just make a new class, inheriting from TIMER so it 
can do all the hard work. If you want to make a timer that 
sends a WM_TIMER message to a window, you just inherit from 
TIMER, add a data member that contains a window handle, 
and change the Fire() function so it sends a message to that 
window. This ability to easily extend an existing design is 
what makes object-oriented language facilities so attractive. 

A couple of parts of this C++ interface were forced on me 
by the need to reuse C code and would normally be a bit 
different. First, all of the friend functions (except TimerCall- 
Back) would either be private member functions or their 


Listing 4 (ctimer.c) 

finclude <windows.h> 
finclude <stdlib.h> 
finclude <stdio.h> 

finclude "ctimer.h" 

int OutOfTimers() ( return TRUE; ) 

finclude ”common.c“ 

void InitTimerPackage(HANDLE Instance, TIMER FIRE Func) 
I 'J 

TD.CallBack = MakeProcInstance( 

(FARPROC)&TimerCallBack, Instance); 

TD.FireFunc = Func; 

) 

TIMER *TimerCreate(int Eventld) 

( 

TIMER ‘Timer = malloc(sizeof(TIMER)); 
InitTimer(Timer, Eventld); 
return Timer; 

} 

void TimerDelete(TIMER ‘Timer) 

I 

DeleteTimer(Timer); 
free(Timer); 

1 

int TimerStart(TIMER ‘Timer, ULONG Interval) 

f 

return Setlnterval(Timer, Interval); 

) 

void TimerStop(TIMER ‘Timer) 

{ 

Setlnterval(Timer, 0); 

) 

/* End of File */ 


A C Implementation of Timer Objects 
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code would be contained in one of the other member func¬ 
tions. Second, because no one should update the Interval field 
except via member functions (so the base timer interval is 
adjusted accordingly), I would have made that a private field. 
Finally, all of the data in the TD variable would have been 
static data members of the class. 

A TPW Implementation 

Turbo Pascal for Windows (TPW) is a version of Pascal that 
contains object-oriented language features. The C++ design 
moved over to TPW fairly easily. Listing 3 (TIMERS. PAS) con¬ 
tains the result. The TPW object declaration corresponds 
roughly to a C++ class. They both allow a private section to 
restrict access to parts of the object In C++, only member and 
friend functions can access the private data. In the case of 
TPW, any function in the same module as the object type 
declaration can access the private data. In other words, to 
truly hide the private data, you must keep the object declara¬ 
tion in a separate unit 

Instead of friend functions or friend classes, in TPW you 
just group together (in the same unit or program) a class with 
every class or function that needs to access its private data. 
TPW supports virtual member functions and inheritance, just 


Listing 5 (timer.c) 

#include <windows.h> 
linclude <stdlib.h> 
linclude <stdio.h> 

linclude "timer.h" 

int TIMER::0ut0fTimers() ( return TRUE; ) 
linclude "common.e" 

void TIMER::InitTimerPackage(HANDLE Instance) 
{ 

TD.CallBack = MakeProcInstance( 

(FARPROC)&TimerCalIBack, Instance); 

) 

TIMER::TIMER(int Eventld) 

{ 

InitTimer(this, Eventld); 

) 

TIMER::~TIMER() 

( 

DeleteTimer(this); 

) 

int TIMER::Start(ULONG Interval) 

( 

return Setlnterval(this. Interval); 

) 

void TIMER: :Stop() 

( 

Setlnterval(this, 0); 

) 

/* End of File */ 


A C++ Implementation of Timer Objects 


Listing 6 (common.c) 

Idefine TIMER MIN RESOLUTION (55) 

Idefine TIMER“mAX“RES0LUTI0N (65535) 

lifdef _cplusplus 

Idefine 0UT0FTIMERS TIMER::0ut0fTimers 
lei se 

Idefine 0UT0FTIMERS OutOfTimers 
lendif 

typedef unsigned long ulong; 
typedef struct TIMERDATA 
{ 

FARPROC Call Back; 

TIMER ‘TailPtr; 
int ActiveCount; 

int Timerld; 

ulong IntervalGcd; 

lifndef_cplusplus 

TIMER_FIRE FireFunc; 
lendif 

) TIMERDATA; 
static TIMERDATA TD; 


ulong Gcd(ulong a, ulong b) 

{ 

ulong Remainder • a; 

if(a*«0 || b**0) 
return 0; 

else 

{ 

Remainder « b V a; 
while((Remainder*b%a) != 0) 

( 

b * a; 

a = Remainder; 

Remainder * b % a; 

} 

return a; 

) 

) 

/* 

* SetBaselnterval - Change the interval of the 

* base Window timer. This function handles 

* requests that are larger or smaller than 

* Windows timer resolutions permit. 

*/ 

int SetBaselnterval(ulong Newlnterval) 

( 

if(TD.IntervalGcd 1* 0) 

Newlnterval * Gcd(TD.IntervalGcd, Newlnterval); 
if(Newlnterval < TIMER_MIN_RES0LUTI0N) 

Newlnterval * TIMER_MIN_RESOLUTION; 
if(Newlnterval > TIMER_MAX_RES0LUTI0N) 

(/* use heuristic to get "nice" interval */ 
while(NewInterval > TIMER_MAX_RESOLUTION) 
Newlnterval /* 2; 

Newlnterval * (Newlnterval / 1000) * 1000; 

} 

if(Newlnterval !« TD.IntervalGcd) 

{ 

if(TD.Timerld !* 0) 

KillTimer(0, TO.Timerld); 
while((TD.TimerId=SetTimer(0,0, 

(unsigned int)NewInterval, 

TD.CallBack)) »* 0) 

if(OUTOFTIMERS()) 
break; 


Common Code for C/C++ Timers 
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Listing 6 

— Cont’d 

if(TD.Timerld) 

void InitTimer(TIMER ‘Timer, int Eventld) 

TD.IntervalGcd “ Newlnterval; 

( 

else 

Timer->EventId » Eventld; 

return FALSE; 

Timer->Interval * 0; 

) 

Timer->ThisTime ■ 0; 


Timer->LastTime 1 0; 

return TRUE; 

if(TD.Tai1Ptr « 0) 

/ 

i 

TD.TailPtr * Timer; 

/* 

Timer->Next * Timer; 

* Reviselnterval() - recalculate Gcd of all timers 

) 

* in circular linked list. 

else 

/ 

/ 

int Reviselnterval() 

i 

Timer->Next = TD.TailPtr->Next; 

( 

TD.TailPtr->Next = Timer; 

TIMER ‘Rover = TD.TailPtr; 

TD.TailPtr = Timer; 

ulong Newlnterval « 0; 

) 

\ 

do { 


Rover * Rover->Next; 

void DeleteTimer(TIMER ‘Timer) 

if(Rover->Interval !* 0) 

( 

if(Newlnterval *« 0) 

TIMER ‘Rover “ TD.TailPtr; 

Newlnterval * Rover->Interval; 

TIMER ‘Previous = 0; 

else 


Newlnterval « Gcd(NewInterval, 

do { 

Rover->Interval); 

if(Rover->Next «• Timer) 

) while(Rover 1= TD.TailPtr); 

Previous * Rover; 

TD.IntervalGcd = 0; 

else 

return SetBaselnterval(Newlnterval); 

Rover = Rover->Next; 

) 

) while(Previous «« 0); 


if(Previous->Next *■ Previous) 

/* 

TD.TailPtr = 0; 

* Setlnterval() - change the interval of a single 

else 

* timer. This may require the base interval 

{ 

* to be changed. Setting the interval to zero 

if(Previous->Next == TD.TailPtr) 

* stops the timer. 

TD.TailPtr * Previous; 

*/ 

Previous->Next = Previous->Next->Next; 

int Setlnterval(TIMER ‘Timer, ulong Newlnterval) 

) 

{ 

/* in case it was active...*/ 

ulong Savelnterval; 

Setlnterval(Timer, 0); 

int TimerWasOn, TimerlsOn, Result; 

) 

Result » TRUE; /* Assume success */ 


TimerWasOn = Timer->Interval != 0; 

WORD FAR PASCAL TimerCal1Back(HWND Window, 

TimerlsOn - Newlnterval !■= 0; 

WORD MsgNum, WORD WParm, LONG LParm) 

/* if deactivating timer */ 

{ 

if(TimerWasOn && ITimerlsOn) 

ulong Time; 

if(--TD.ActiveCount «« 0) 

TIMER *Rover=TD.Tai1Ptr; 

( 

if(!Rover) return 0; 

KillTimer(0, TD.Timerld); 

do ( 

TD.Timerld * 0; 

Rover = Rover->Next; 

TD.IntervalGcd = 0; 

if(Rover->Interval) 

/ 

else 

\ 

Time = GetTickCount (); 

Result ■ Reviselnterval(); 

if(Rover->Interval+Rover->ThisTime 

/* else if starting a timer */ 

<= Time) 

else if(TimerIsOn && ITimerWasOn) 

( 

{ 

Rover->LastTime = Rover->ThisTime; 

Timer->Interval » Newlnterval; 

Rover->ThisTime = Time; 

if(Newlnterval > TIMER MAX RESOLUTION) 

fifdef cplusplus 

Result ■ Reviselnterval(); 

Rover->Fire(); 

else 

#el se 

Result = SetBaselnterval(Newlnterval); 

TD.FireFunc(Rover); 

if(Result) 

fendif 

++TD.ActiveCount; 

} 

/ 

/* else if changing timer interval */ 

/ 

} while(Rover !* TD.TailPtr); 

else 


( 

return 0; 

Timer->Interval = Newlnterval; 

) 

Result “Reviselnterval(); 


) 

/* End of File */ 

return Result; 

) 
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as C++ does. TPW also supports constructors and destructors, 
although the syntax is completely different. 

The TPW implementation also includes a window timer 
class, based on the timer class. The Fire() function for the 
window timer class must decide whether to post messages 
(add them at the end of the queue) or send messages. The 
problem is, the default application queue only allows eight 
messages, and simulated timers tend to clump up. For that 
reason, this Fire() function posts messages until the queue 
fills up and then sends them. If you are going to use a lot of 
timers, you might want to call the Windows function Set- 
MessogeQueuef) to increase the message queue size. 

All in all, when you compare the C++ timer implementation 
with the TPW timer implementation, you find more similarities 
than differences. 


tegrated Windows interface with a very fast compiler was a 
pleasant improvement over previous alternatives. We should 
soon be able to enjoy the same ease-of-use with several 
other vendor's compilers. 

Object-oriented programming is a new method for attack¬ 
ing an old problem: software complexity. Designing with ob¬ 
jects can help you divide the problem into pieces that are as 
independent as possible, and as able as possible to withstand 
changing requirements. As object-oriented language features 
become more common, object-oriented programming be¬ 
comes a more necessary, and enjoyable, skill. □ 


A TPW User Interface 

Listing 7 contains a demonstration 
program for the TPW timer package. 
This program uses the ObjectWindows 
package that comes with TPW to create 
a multiple-document interface window 
(see Figure 4) for starting, stopping, and 
monitoring timers. Each timer appears 
in its own child window. To delete a 
timer, simply delete the window in 
which it appears. 

I learned a lot from this experience 
with ObjectWindows. You sometimes 
hear people explain that class libraries 
simplify Windows programming be¬ 
cause a handful of classes replaces 
hundreds of Windows API functions. 
What this ignores, of course, is that the 
handful of classes contains hundreds of 
member functions. If you want access 
to the complete functionality of Win¬ 
dows, then you can't escape its com¬ 
plexity. 

Summary 

Even though the timer class is a 
simple one, I was surprised at how easy 
it was to move it between TPW and 
C++. Another surprise was the relative 
strictness of the two languages. Con¬ 
sidering their parents (C and Pascal), it is 
ironic that C++ provides stricter compile¬ 
time checking than TPW. For example, 
defining a constructor in a C++ class 
guarantees that every instance of that 
class will be initialized. In TPW, a con¬ 
structor is something you must call ex¬ 
plicitly-, if you forget, it still compiles. 

Although it’s not a language feature, 
I should point out that TPW is a true 
Windows development environment (al¬ 
though the debugger still runs in char¬ 
acter mode). The combination of an in- 


Listing 7 (timedemo.pas) 


{ Multi-timer demo package. ) 


program MultiDemo; 

{ 

The following resource is supplied with the examples that 
come with TPW. 

) 

{$R MDIAPP.RES) 

uses WObjects, WinTypes, WinProcs, Strings, StdDlgs, Timers; 


type 

TimerMDIWin = object(TMDIWindow) 

TimerNumber : integer; 
function InitChild : PWindowsObject; virtual; 
function CreateChild : PWindowsObject; virtual; 
constructor Init(ATitle: PChar; AMenu: HMenu); 
procedure WMSize(var Msg:TMessage); virtual wm_First + wm_Size; 
private 

function GetTimer : integer; 

end; 

PTimerMDIWin « ^TimerMDIWin; 

TimerWin « object(TWindow) 

Total Events : Longint; 

Eventlnterval : Longint; 

LastEvent : Longint; 

WinTimer : PWindowTimer; 

constructor Init(AParent:PWindowsObject; Title:PChar; 

Interval:Longint); 

Destructor Done; virtual; 
procedure SetupWindow; virtual; 

procedure WMTimer(var Msg:TMessage); virtual wm_First + wm_Timer; 
procedure Paint(PaintDC : HOC; var PaintInfo:TPaintStruct); virtual; 
procedure llpdateTitle; 
end; 

PTimerWin = A TimerWin; 

{ Define a TApplication descendant ) 

TMDIApp - object(TApplication) 
procedure InitMainWindow; virtual; 
end; 


A TPW Timer Tester 
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Listing 7 — Cont’d 


constructor TimerWin.Init(AParent:PWindowsObject; Title:PChar; 
Interval:Longint); 

begin 

TWindow.Init(AParent, Title); 

Eventlnterval := Interval; 

Total Events := 0; 

end; 

destructor TimerWin.Done; 
var 

p : PTimerMDIWin; 
begin 

if WinTimer <> NIL then 

Dispose(WinTimer, Done); 

UpdateTitle; 

TWindow.Done; 

p := PTimerMDIWin(Parent); 
p A .TileChildren; 

end; 

procedure TimerWin.UpdateTitle; 
var 

Sbuf : string[128]; 

Wbuf : array [0..127] of char; 

begin 

Str(TimerGetInterval, Sbuf); 

Sbuf := 'Timer Demo (interval ■» '+Sbuf+')'; 

StrPCopy(Wbuf, Sbuf); 

SetWindowText(Parent A .HWindow, Wbuf); 

end; 

procedure TimerWin.SetupWindow; 

begin 

WinTimer := New(PWindowTimer, Init(@Self)); 
WinTimer^.StartfEventlnterval); 

UpdateTitle; 

end; 

procedure TimerWin.WMTimer(var Msg:TMessage); 

var 

Rect : Trect; 
begin 

Rect.left := 0; 

Rect.right := 100; 

Rect.Top := 0; 

Rect.Bottom := 100; 

InvalidateRect(HWindow, @Rect, TRUE); 

PostMessage(HWindow, wm_Paint, 0, 0); 

Total Events := TotalEvents+1; 

end; 

procedure TimerWin.Paint(PaintDC : HDC; var PaintlnfoiTPaintStruct); 
var 

TextDC : HDC; 

Sbuf : string[128]; 

Wbuf : array [0..127] of char; 
begin 

TextDC := PaintDC; 

Str(GetTickCount, Sbuf); 

Sbuf := 'Time '+Sbuf; 

StrPCopy(Wbuf, Sbuf); 

TextOut(TextDC, 0, 0, WBuf, Length(Sbuf)); 

Str(TotalEvents, Sbuf); 

Sbuf := 'Count '+Sbuf; 

StrPCopy(Wbuf, Sbuf); 

TextOut(TextDC, 0, 15, WBuf, Length(Sbuf)); 

end; 
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Listing 7 — Cont’d 

constructor TimerMDIWin.Init(ATitie: PChar; AMenu: HMenu); 
begin 

TMDIWindow.Init(ATitle, AMenu); 

TimerNumber := 0; 

end; 

function TimerMDIWin.CreateChild: PWindowsObject; 
begin 

CreateChild ;= TMDIWindow.CreateChild; 

TileChildren; 

end; 

procedure TimerMDIWin.WMSize(var MsgiTMessage); 
begin 

TMDIWindow.WMSize(Msg); 

TileChildren; 

end; 

function TimerMDIWin.InitChild: PWindowsObject; 
var 

Name : array [0..63] of char; 

Temp ; string[64]; 

Text : array[0..79] of char; 

Sbuf : string[128]; 

Units : string[10]; 

Interval, Printlnterval : Longint; 

Code : integer; 
begin 

Text[0] :* #0; 

StrCopy(Text, '5000'); 

if Application /v .ExecDialog(New(PInputDialog, Init(@Self, 
'Timer Demo', 'Enter timer interval'. 

Text, SizeOf(Text)))) = id_0K then 
begin 

StrPas(Text); 

Sbuf := Text; 

Val(Text, Interval, Code); 

Str(6etTimer, Temp); 

Printlnterval : x Interval; 
if (Printlnterval mod 1000) = 0 then 
begin 

Units := 's'; 

Printlnterval ;= Printlnterval div 1000; 

end 

el se 

Units := 'ms'; 

Str(PrintInterval,$buf); 

Temp :* '#'+Temp+' ['+Sbuf+Units+']'; 

StrPCopy(Name, Temp); 

InitChild := New(PTimerWin, Init(@Self, Name, Interval)); 
end 

else 

InitChild NIL; 

end; 

function TimerMDIWin.GetTimer : integer; 
begin 

TimerNumber ;= TimerNumber+1; 

GetTimer := TimerNumber; 

end; 

{ Construct the THelloApp's MainWindow object, loading its menu } 

procedure TMDIApp.initMainWindow; 

begin 

MainWindow := New(PTimerMDIWin, Init('Multi-timer demo', 
LoadMenu(HInstance, 'MDIMenu'))); 

end; 

{ Declare a variable of type TMDIApp} 
var 

MDIApp: TMDIApp; 
x : longint; 

{ Run the MDIApp } 
begin 

MDIApp.Init('MDIApp'); 

MDIApp.Run; 

MDIApp.Done; 
end. 

{ End of File } 
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An Easy Way To Use 


This article demonstrates an easy way to use expanded memory 
on the IBM PC. Turbo Pascal v6.0 includes the TEmsStream object that 
allows expanded memory to be read and written to like a file. 

DOS developers are mainly interested in conventional, expanded, 
and extended memory types. The first two types may exist on any 
PC that employs a member of the 80x86 family as its CPU. Extended 
memory can co-exist with the other two varieties but is only present 
on machines with 80286 and newer processors. 

History Of PCs And Memory 

I will clarify the differences between the three types of memory 
mentioned, by explaining how MS-DOS has evolved. The IBM PC and 
XT computers are based on the Intel 8088 CPU. This processor has 
registers that are 16 bits wide, 20 address lines, and an eight-bit 
wide data path. The 20 address line design of the 8088 limits 
memory address space. Two raised to the 20th power yields an 
upper limit of 1Mb of addressable memory. The upper end of this 
address space was reserved for video and ROM memory, and the 
bottom 640 Kb was used by the operating system and application 
programs. As quality high-level language compilers became available 
for the PC, developers migrated from assembly language to these 
high-level languages and applications grew in size. This created pres¬ 
sure for more addressable memory for the 8088 and gave birth to 
expanded memory. 


Michael Kelly is a free-lance writer/programmer 
who uses the languages C, C++, Pascal, and 80x86 
Assembler. He can be reached by regular mail at 
254 Gold Street, Boston, MA 02127, or by e-mail on 
TelePath asmkelly. 
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Expanded Memory On The IBM PC 


Expanded memory allows an application or operating en¬ 
vironment such as Desqview, to swap code and/or data be¬ 
tween an area of the first megabyte of memory on the sys¬ 
tem board and an add-in memory board that resides on the 
system bus. This variation on bank switching is awkward, but 
it is much faster than swapping out to the hard drive. 

Extended memory refers to memory with addresses 
greater than 1Mb and therefore not addressable by 8088 CPUs, 
if you purchase an 80386 based PC with 4Mb of memory, for 
example, 3Mb or so of this will be extended memory. Unfor¬ 
tunately, many 8088 based micros still exist and this large 
market tilts development away from exploiting the capacity of 
the new processors. The size of this market induced Intel to 
provide backward compatibility in its new generation of 
processors. This means that each new generation of proces¬ 
sors can emulate its predecessors. Many DOS applications are 
designed to exploit expanded memory. Unless you intend to 
run UNIX or some other operating system on your PC, you are 
likely to gain more from your RAM complement if the ex¬ 
tended memory on your system is used as expanded 
memory. Many expanded memory managers (installable 
device drivers used to manage the expanded memory add-in 
boards) are able to use the paging or virtual memory 
capability of 80386 and 80486 machines to serve up extended 
memory to applications as though it were expanded memory. 
If you do not use such a memory manager, you may find 
yourself in the absurd situation of being unable to run a 
900Kb application on an 80386 PC with 4Mb of memory. 

Because of the growing number of PCs with 80286 and bet¬ 
ter processors, DOS Extender technology is gaining popularity. 
This technology exploits the larger address space of the newer 
processors while allowing applications to use MS-DOS system 
services. Basically the DOS extender puts the processor in 
protected or virtual addressing mode, launches the applica¬ 
tion, and when an application needs to use an MS-DOS system 
call, it switches the processor into real modefthe processor 
performs np address translation and acts like an 8086) calls 
MS-DOS, and switches back to protected mode. The MS-DOS 
extenders provide protocols to allow the application to send 
and receive information to and from these system calls. Users 
of these machines are allowed to run large applications 
without giving up the inexpensive programs available for MS- 
DOS. 


The TEmsStream Object 

High-level language programmers unfamiliar with 80x86 as¬ 
sembly language may be reluctant to program software inter¬ 
rupts under MS-DOS. Until recently, the only alternative that 
allowed developers to access expanded memory has been the 
purchase of a toolbox of library routines. Turbo Pascal v6.0 
provides a TEmsStream Object that allows expanded memory 
to be read and written as though it were a file. The interface 
this provides to expanded memory is much cleaner than the 
myriad of interrupt calls needed to accomplish the same 
results using assembler. 
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Listing 1 (tryems.pas) 

t* 

begin 

File: TryEms.Pas; 

LoadFilelnEms :■ False; 

Description: A Test Bed for a TEmsStream Object. 

close(TextFile); 

Compiler: Turbo Pascal V.6.0 

exit; 

Date: 3/6/91; 

end 

Author: Michael Kelly; 

else 

begin 

Comments: A TEmsStream provides Stream I/O 

MyStream.WriteStr(@file line); 

for Expanded Memory Specification 

if MyStream.Status <> stOk then 

3.2 and 4.0 type memory. 

begin 

LoadFilelnEms :* False; 

The TEmsStream interface eliminates 

close(TextFile); 

the book-keeping that would be 

exit; 

required if calls to Interrupt $67 

end; 

( the Ems Interrupt ) were made 

end; 

directly. 

end; 

LoadFilelnEms :- True; 

This program was debugged using 

close(TextFile); 

the AboveDisk+ Expanded Memory 

end; 

Manager on an XT Clone using 

(* LoadFilelnEms *) 

disk space to emulate expanded 

(* 

* Opens text file entered on the command line 

memory. 

Copyright: Put in the Public Domain by 

* and calls LoadFilelnEms to read the file 

the Author. 

* and write it on the TEmsStream. 

$$$ Warning $$$ 

* returns: False on error. True otherwise. 

Error recovery should include calling 

/ 

function ReadFile(file name: String) : Boolean; 

the TEmsStream destructor ( Done ) if 

var 

at all possible, otherwise the user 

FileVar: Text; 

will have to reboot the machine to 


reclaim any memory allocated from Ems. 

begin 

*) 

($1-) Assign(FileVar, filejiame); 

Reset(FileVar); I$I+} 

if IOResult <> 0 then 

Program TryEms; 

begin 

Uses Objects, Dos; 

ReadFile :■ False; 
exit; 

(* 

end; 

* minimum and maximum Ems Memory to 

($1-) ReadFile :■ LoadFilelnEms(FileVar); ($1+) 

* allocate to the TEmsStream. 

end; 

*) 

(* ReadFile *) 

Const 


MinEmsMem: Longlnt * 64 * 1024; 

(* 

MaxEmsMem: Longlnt * 256 * 1024; 

* Seeks to the start of the TEmsStream “MyStream" 

* and alternately reads a string from the stream 

var 

* and writes it to the screen. First a byte is 

MyStream : TEmsStream; { The Ems Stream } 

* read from the TEmsStream into the length byte 

* of the string, then that number of bytes is 

* read into the string at index 1, completing 

(* 

* the string. The string is then output to 

* Reads an open file of type "text" a line at 

* the screen using WriteLn. 

* a time, and writes each line to the Ems 

*) 

* Stream "MyStream" using the WriteStr method 

procedure DisplayEms; 

* inherited from TStream. 

var 

* 

str : String; 

* returns: False on error. True otherwise. 


*) 

begin 

function LoadFileInEms(var TextFile: text) : Boolean; 

MyStream.Seek(0); 

var 

if MyStream.Status <> stOK then 

file line: String; 

exit; 

len : Word; 

WriteLn; 

WriteLn; 

begin 

WriteLn('Fi 1 e Contexts ...'); 

while (not Eof(TextFile)) and 

WriteLn; 

(MyStream.GetSize < MaxEmsMem) do 

while MyStream.GetPos < MyStream.GetSize do 

begi n 

begi n 

ReadLn(TextFile, file line); 

MyStream.Read(str[0], 1); 

if IOResult <> 0 then 

MyStream.Read(str[1], Word(Byte(str[0]))); 

begin 

if MyStream.Status <> stOK then 

LoadFilelnEms :* False; 

exit; 

close(TextFile); 

WriteLn(str); 

exit; 

end; 

end; 

end; 

len :* Length(file line) + 1; 

(* DisplayEms *) 

if (MyStream.GetSize + len) > MaxEmsMem then 
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The TEmsStream class is a direct descendant of class T- 
Stream. TStream is a virtual base class that provides a 
framework for generalized stream I/O. TEmsStream-specific 
methods are annotated “Override: Never" in the Turbo Vision 
documentation, indicating they need no modification to access 
expanded memory. The constructor init takes two argu¬ 
ments of type Longlnt named MinSize and MaxSize. These 
arguments describe the minimum and maximum expanded 
memory that will be allocated to the stream (note that the 
Turbo Vision manual shows only the MinSize argument, but 
the pop-up help in the IDE has the correct header). GetPos 
and GetSize both return Longlnts giving the current position 
and current size of the stream respectively. Seek, Read, and 
Write provide the means to manipulate stream data in a 
straightforward manner. A method in¬ 
herited from TStream, WriteStr is used 
in Listing 1 to write strings to expanded 
memory in one operation. Because the 
TStream Write method is a virtual pro¬ 
cedure, WriteStr ends up calling 
TEmsStream' s Write method when it 
uses TStream’ s Write method (an ex¬ 
ample of polymorphism), but it saves 
the programmer from getting the 
length of the string. If you have Turbo 
Debugger and compile the program for 
stand-alone debugging, you can trace 
into the Objects Unit and see it making 
calls to the EMS Interrupt ($67) to map 
EMS pages and so on. 

When using an object derived from 
TStream, keep in mind that if an error 
occurs, no further operations are al¬ 
lowed on the stream until the error is 
cleared with the method Reset. Suc¬ 
cessful completion of TStream methods 
is indicated by the member variable 
Status being set to the value stOk. 

Otherwise Status has a value indicating 
the operation that caused the error 
such as stReadError, stWriteError 
etc. Additional error information is 
stored in the member variable Error- 
Info. Errorlnfo is an integer and may 
contain a DOS system error code, an 
EMS error code, or other information 
specific to storing TObjects on streams. 

Persistant Objects under Turbo Vision 
won't be discussed in this article, but 
let me just say here that methods are 
provided to convert Turbo Vision Ob¬ 
jects into resources that may be kept 
on disk and loaded into Turbo Vision 
Applications at runtime. 

The Turbo Pascal 6.0 source code in 
Listing 1 demonstrates storing an ASCII 
file in expanded memory, reading it 
back a line at a time, and displaying 
each line on screen. Note that since this 


is only a test demo, if the entire ASCII file cannot fit in EMS, 
the procedure returns False, the file is closed, and the EMS 
memory freed. As you can see, accessing expanded memory 
in this fashion is not complex at all. The only caution I would 
give to programmers is to make every effort to free any allo¬ 
cated expanded memory during error recovery or program 
termination. If this is not done, the user must reboot the com¬ 
puter to recover use of the memory and may become an¬ 
noyed with your program. 

If you intend to use more than a trivial amount of the 
expanded memory available when debugging in the IDE, in¬ 
voke Turbo Pascal with the x command line switch deac- 
tivated(i.e. Turbo -x- TryEms.Pas). Otherwise Turbo Pascal will 
garner most of the available EMS to use as swap-space. □ 
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C Bug # 60^ 

#include <stdio.h> 


char *hello( char *s ) 

r 


l 

char buffer [40]; 


sprintff buffer, "Hi %s 

" , s ) ; 

return buffer; 

} 



Assuming that the argument string is never greater than 20 characters 
there is, nonetheless, a subtle bug in this C function. Can you spot it? 
If not, give us a call. Hint: it "works" some of the time. 
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Listing 1 

-Cont’d 

(* 

begin 

* When debugging, it's easy to reset the program 

if ParamCount < 1 then 

* and then realize EMS is allocated (that's why 

begin 

* they call it oops!). When this happens, put 

WriteLn('Usage: TryEms text file'); 

* lines like the following at the start of the 

halt; 

* main program body: FreeEmsHandle(l); 

end; 

* FreeEmsHandle(2); 

MyStream.Init(MinEmsMem, MaxEmsMem); 

★ 

if MyStream.Status <> stOk then 

* 

begin 

* Halt; 

WriteLn('Could not open Ems Stream'); 

★ 

Halt; 

* re-compile and run. 

end; 

★ 

if (not ReadFile(ParamStr(l))) then 

* call FreeEmsHandle as many times as needed 

begin 

* to free EMS memory without rebooting, then 

WriteLn; 

* delete the lines and re-compile. Kinda Kludgy 

Write('Error Reading File '); 

* but better'n rebootin'. 

WriteLn(ParamStr(l)); 

*) 

if MyStream.Status <> stOK then 

procedure FreeEmsHandle(handle: Word); 

MyStream.Reset; 

var 

MyStream.Done; 

R:Registers; 

halt; 


end; 

begin 

DisplayEms; 

R.AH := $45; 

if MyStream.Status <> stOK then 

R.DX := handle; 

MyStream.Reset; 

Intr($67, R); 

MyStream.Done; 

end; 

end. 

{ Main } 

{ End of File ) 
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Accessing HPFS Files 
From MS-DOS 

Yishai Sered 

OS/2 vl.2 offers the first implementation of an Installable File Sys¬ 
tem (IFS): the High Performance File System (HPFS). The HPFS provides 
several advantages over the traditional File Allocation Table (FAT) file 
system (see the sidebar - Device Drivers, IFS, and Why HPFS is Good 
For You). Innovation in the realm of PCs, however, is always 
tempered by the old issue of backwards compatablilty. When DOS 
3.0 introduced the 16-bit FAT file system for disks larger than 20MB, 
prior DOS versions could not access the newer file system. Unlike 
these modifications, however, the new HPFS hurdle is steep. Upgrad¬ 
ing from DOS 2.1 to 3.0, or from 3.x to 4.0, was a nuisance. Moving to 
OS/2 with the HPFS, on the other hand, is an all-or-nothing decision. 
No version of DOS can access files stored on an HPFS disk. 

The HPFS internals I'll describe in this article are based on a pro¬ 
gram which, running under DOS, can access files on an HPFS disk. The 
discussion focuses on the HPFS static data structures, which par¬ 
ticipate in locating file data. I make no attempt to describe the 
processes of dynamic allocation, bad sector management, empty 
space management, or Extended Attributes (EAs). 

Disk Organization 

The HPFS organizes the various disk entities around the FNODE 
(short for File NODE). Each file or directory has an FNODE, which con¬ 
tains descriptive information such as extended attributes, creation, 
modification, and access dates, sizes, and pointers to disk locations 
where the file's data is stored. All FNODEs are one sector in size. 

The smallest unit of disk space is the sector (currently exactly 512 
bytes long). Pointers to disk entities are 32-bit Relative Sector Num¬ 
bers (RSNs), which are sector offsets from the beginning of the HPFS 
partition. Unless otherwise noted, the RSN for any group of con¬ 
tiguous sectors is the RSN of the first sector. Directory blocks are 
allocated in clusters of four contiguous sectors. Files are allocated in 
multiples of single sectors. 

Before accessing the disk structure itself, you must obtain infor¬ 
mation contained within the Super Block. This one-sector block, kept 
at RSN lOh, contains a pointer to the root directory FNODE. This 
pointer is found at offset OCh of the Super Block. The root directory 
FNODE, in turn, has a pointer to the first root directory cluster (see 
the structure EntryFnodeType for details). 


Yishai Sered is in charge of data security products at News 
Datacom Research, Ltd. You can reach him at P.O. Box 23012, 
Jerusalem 91235, Israel. 
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linclude <os2def.h> 

#include <io.h> 
linclude <fcntl.h> 
linclude <bios.h> 
linclude <dos.h> 
linclude <string.h> 
linclude <stdio.h> 
linclude <stdlib.h> 


Ipragma pack(l) 

// 


^************************************************************★★★★★★*******★* j 

1* #defines */ 

/*************************************************************************** J 

Idefine CHUNK 0x2000L 


Idefine SUPER_BLOCK 0x10 


Idefine FIXED DRIVE 0x81 
Idefine HPFS_PART 7 


Idefine DOWN (-1) 

Idefine SAME 0 

Idefine UP 1 


Idefine STD0UT 1 

Idefine NO ARG 1 

Idefine BAD DISK 2 

Idefine NO FILE 3 

Idefine I0~ERR 4 

II 

// Return codes to DOS 

/★*****************************★********************★*★*★******************* j 

/* structures */ 

/★***★********★*******★********★***************★***********★★*★*★*********★* j 

typedef UL0NG RSN; 

// Relative Sector Number 



Drawbridge 

Source Code Generating Graphics 
Editor and Screen Prototype Tool 


Drawbridge™ spares you the tedious, error-prone task of programming graphics displays. 
You know how hard it is to create graphics and prototype screens by trial and error. It 
seems to take forever to get everything in the right position. And then there’s the 
experimenting with colors, pen patterns, fonts, etc. 

Drawbridge will forever change the way you create graphics screens. Create the screen 
with Drawbridge’s interactive editor. The program keeps track of what you draw and where 
you draw it. You can change the display until it’s exactly the way you want it. When 
you’re done, Drawbridge generates a file of source code calls to your graphics library. Add 
the generated file to your program, compile, link, and you’re all done! 

Since Drawbridge generates source code, you can modify the output however you like. 
And since the source code is compiled with your own program, you’re not tied into having 
a separate image file for each display. 

If you're new to graphics programming, Drawbridge will make it easy for you to create 
complex graphics right from the start. Experienced programmers will appreciate the 
incredible time savings that interactive editing and code generation provides. Drawbridge- 
the only interactive graphics editor designed specifically for programmers. 


Free Demonstration: Download from our 
BBS at (217) 359-6165 or call us to get a 
free demo disk and a product brochure. 


Borland® BGI (C or Pascal) .$89 

MetaWindoW™ (CorPascal) ... $189 
Microsoft® (C). $89 


Courseware Applications, Inc. 

481 Devonshire Drive • Champaign, IL 61820 
Tel: (217) 359-1878 • Fax: (217) 359-1880 

All trade names are trademarks or registered trademarks of the respective manufacturer. 


□ Request 193 on Reader Service Card □ 


Directories 

The root directory is identical to the 
other directories in the file structure, 
unlike DOS where it has a fixed location 
and size. The root directory may ex¬ 
pand or shrink. As a directory grows, it 
is split into a tree structure. The direc¬ 
tory FNODE points to the base node of 
the tree. Each entry in the tree has a 
pointer to one directory entry and pos¬ 
sibly a pointer to a directory node that 
may point to entries whose names are 
sorted before the pointer entry. This 
structure provides a quick path for find¬ 
ing a particular entry, along with a 
simple method of scanning all entries. 

The function FindFileFnode (), which 
implements the search algorithm, uses 
the following process: 

To find entry TARGET: 

1. Find directory FNODE-, 

2. Find directory base node-, 

3. Scan nodes until entry >= TARGET 

4. If (entry == TARGET) 

terminate successfully; 

5. else if (entry has a node pointer) 

6. set search node to pointed node-, 

7. go to step 3; 

8. else terminate with failure 

This process eliminates the need to 
travel up the tree - from a pointed-to 
node to its predecessor. Scanning all 
entries does, however, require travelling 
up. Each directory node has a pointer to 
its parent, and the base node has a flag 
which terminates the up movement. 

To simplify the scanning process, 
each directory has two pseudo entries 
that replace the and of the FAT 
system. The first entry contains a 
pseudo-filename two bytes long with 
the value 01 01. This value, of course, 
sorts before all possible legal File names. 

The last entry in a node is one byte 
long with the value FF. This entry sorts 
after all possible legal file names, thus 
providing the ending condition for step 3. 

Once FindFileFnodef) finds the re¬ 
quired entry, another function may ex¬ 
amine its FNODE to verify whether the 
entry is a file or a directory. You can thus 
follow any pathname, subdirectory by 
subdirectory, until you find the required 
file FNODE. The function FindFilef) per¬ 
forms the path scan recursively. 
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Device Drivers, IFS, And Why HPFS Is Good For You 


The installable File System is one of the innovations 
OS/2 introduced. It allows OS/2 programs (and DOS 
programs running in the DOS box) to access any file- 
structured medium, regardless of the particular im¬ 
plementation. 

The installable device driver, introduced in MS-DOS 
2.0, allowed device and media manufactururs to con¬ 
nect their product to the PC and access it through the 
DOS file structure. The DOS file structure, however, 
limits you to DOS-formatted data. A CP/M diskette file, 
for instance, is unaccessible even though the floppy 
drive can read the medium. 

The IFS takes things one step further. In the IFS, any 
file structured device can be accessed. The device 
must support 

the directory tree and extended attributes, and 
allow open, close, entry search, etc. It is free, however, 
to implement the file structure in any way. IFS thus sup¬ 
ports accessing UNIX i-nodes and Macintosh disks. A CD- 
ROM interface is as easy a pie. 

The first member of the IFS family is OS/2's High Per¬ 
formance File System. This implementation of a hierarchi¬ 
cal file system foregoes the DOS FAT. Its main advantages 
become apparent when dealing with very large files, 
directories with a large number of entries, etc 

The HPFS claims to prevent fragmentation much 
better than the FAT by preallocating file space. A file 
under the FAT system can only own the number of 
clusters it actually uses. If clusters are chained to a File 
beyond the size of the file as written in the directory, 
CHKDSK truncates the file. In the HPFS, a file can own 
any number of sectors above and beyond its length. My 
experience with the HPFS showed that it is indeed dif¬ 
ficult to fragment a file. Difficult, but not impossible. 

The HPFS’s second advantage over the FAT system 
is its sorted, tree-structured directories. The directory 
and subdirectory structure is not multi-level like a tree, 
but the directory itself is maintained in a tree-like 
structure. This arrangement, coupled with the sorting, 
permits much faster searches in a large directory. The 
directories are also positioned on the disk in a way 
that reduces the amount of seek time required to ac¬ 
cess them. 

Extended attributes are attached to the file through 
the FNODE. In FAT systems, OS/2 must perform a 


separate search of an extended attributes depository 
in order to find a file’s extended attributes. 

Not described in this article is a fourth advantage: 
the empty space table in the HPFS is a bitmap, not a 
word-per-cluster map. This makes for faster location of 
empty space, especially in the 80386 (OS/2 2.x) environ¬ 
ment which has a bit scan instruction. 

The HPFS also allows long file names, up to 254 
bytes long. The filename can have embedded spaces 
and any number of periods ('.'). 

The last advantage of the HPFS is the built-in cache 
to improve performance. Although a FAT system will 
also benefit from caching, having the cache built into 
the file system itself makes optimal use of the cache 
memory. □ 
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Listing 1 — Cont’d 

typedef struct { 

BYTE Bootlnd; 

BYTE BH; 

BYTE BS; 

BYTE BCyl; 

BYTE Syslnd; 

BYTE EH; 

BYTE ES; 

BYTE ECyl; 

RSN PartitionOffset; 

ULONG NumSect; 

) PartitionEntry; 

static struct { 

char BootCode [OxlBE]; 

PartitionEntry Partitions[4]; 

USHORT Signature; 

) VolumeBootSector; 

static struct ( 
char JMP[3]; 
char 0EM[8]; 

USHORT BytesPerSector; 

BYTE SectorsPerCluster; 

USHORT ReservedSectors; 

BYTE NumOfFATs; 

USHORT NumRootDirEntries; 

USHORT SectorsInMedia; 
char MediaDescriptor; 

USHORT SectorsInlFAT; 

USHORT SectorsInTrack; 

USHORT NumOfHeads; 

ULONG NumOfHiddenSectors; 

ULONG LongSectorsInMedia; 
char BootCode[OxlDE]; 

} PartitionBootSector; 

typedef struct { 

USHORT uscDirEntrySize; 

BYTE bSplitFlag; 

fdefine DIRSPLITS 4 

Idefine END OF OIR 8 

BYTE bFlags; 

fdefine FLAG_DIR 0x10 

RSN ulPointedSector; 

ULONG ulDatel; 

ULONG ulcFileLength; 

ULONG uiDate2; 

ULONG ulDate3; 

BYTE bReserved2[6]; 

BYTE bcNameLength; 

BYTE bName[l]; 

) DirEntryType; 

typedef struct { 

ULONG ulMagicNumber; 

BYTE bReservedl[8]; 

BYTE bcEntryNameLen; 

BYTE sEntryName[OxF]; 

RSN ulParentSector; 

BYTE bReserved2[0xl4]; 

USHORT uscExtendedAttributes; // 34 
BYTE bReserved3; // 36 

BYTE bEntryType; // 37 

BYTE bFragFilelnd; // 38 

fdefine MANY FRAGMENTS 0x80 


BYTE bReserved4[4]; 

// 39 

BYTE bcFragNum; 

// 30 

BYTE bReserved5[2]; 

// 3E 

union { 


struct { 


ULONG ulcFragSectors; 


RSN ulFragSector; 


) ManyFragsfOxC]; 

// 40 

struct ( 


ULONG ulcFragSoFar; 


ULONG ulcFragSectors; 


RSN ulFragSector; 


) FewFrags[8]; 

// 40 

) FragTable; 


ULONG ulcFileLength; 

// 58 

BYTE Reserved6[0xlA4]; 

// 5C 


} EntryFnodeType; 


// 00 
// 02 


// 03 

// 04 
// 08 
// OC 
// 10 
// 14 
// 18 
// IE 

// IF Variable length item 
// Formal length 0x20 bytes 


// 00 
// 04 
// OC 
// 00 
// 1C 
// 20 


Files 

Since the length of a file may 
change, a file on the disk may be 
stored in any number of fragments of 
one or more contiguous sectors. Note 
that a file may own sectors that do not 
contain any file data. Such sectors are 
pre-allocated to the file by the Dos- 
Open() API call. The file's FNODE contains 
the correct active file length. 

The file system keeps track of the 
file fragments in one of two table types, 
which I call few fragments and many 
fragments. The file's FNODE contains a 
flag that specifies to which type it 
belongs. 

For a file with few fragments, the file 
FNODE points to all the fragments. The 
file FNODE contains a table of the RSN of 
each fragment, along with its size and a 
running total of the number of sectors 
that precede this fragment. 

A file with many fragments has a 
tree-style table of pointers to frag¬ 
ments. The file FNODE table contains 
entries which point not to the file data, 
but to sectors which contain a table of 
pointers. Each of these sectors contains 
a flag that specifies whether the table is 
of data pointers or of table pointers 
again (see the structure Fragmented- 
FileTableType in Listing 1). 

The functions DoFewFragsf) and Do- 
Many Frags () follow (recursively if neces¬ 
sary) the file fragments, and read them 
through the function DoSectorsQ. 

The Program 

The sample program in Listing 1 
finds and copies to standard output any 
file on the HPFS partition on the first 
hard disk (Q. You could use the pro¬ 
gram to read HPFS files after booting 
DOS from a floppy. Given the macro 
FIXED_DRIVE with a value 0x81, the 
program would read files from the HPFS 
partition on the second hard disk (D). 
This would be useful to those who have 
one FAT disk, perhaps for a dual OS/2- 
DOS boot, and a second, HPFS disk. 
Some additional code would be neces¬ 
sary if the HPFS partition and an FAT 
partition share the same disk. You 
would then have to follow the logical 
volume assignment through the ex¬ 
tended DOS partition chain (see the 
sidebar on Disk Partitions, page 32). 
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Listing 1 —Cont’d 

ULONG ulcFileLength; 

// 

58 

BYTE Reserved6[0xlA4]; 

// 

5C 

) EntryFnodeType; 



typedef struct f 



ULONG ulMagicNumber; 

// 

00 

BYTE bReservedl[4]; 

// 

04 

BYTE bTopOfDir; 

// 

08 

//Idefine IS_T0P 1 

// 

Bit on in "root" fnode of directory 

BYTE bReserved2[3]; 

// 

09 

RSN ulParentSector; 

// 

OC 

RSN ul Myself; 

// 

10 

DirEntryType FirstDirEntry; // 

14 Formal length 0x20 bytes 

BYTE bReserved3[0x7CC]; 

// 

34 

) DirectoryClusterType; 



typedef struct { 



ULONG ulMagicNumber; 

// 

00 

RSN ulMyself; 

// 

04 

RSN ulParentSector; 

// 

08 

BYTE bFragFilelnd; 

// 

OC 

BYTE bReservedl[4]; 

// 

0D 

BYTE bcFragNum; 

// 

11 

BYTE bReserved2[2]; 

// 

12 

struct { 

// 

14 

ULONG ulcFragSoFar; 



ULONG ulcFragSectors; 



RSN ulFragSector; 



) FragTable[l]; 

// 

Formal length OxC bytes 

BYTE bReserved[0x7E0]; 

// 

20 

) FragmentedFileTableType; 



typedef struct | 



BYTE bReservedl[OxC]; 

// 

00 

RSN RootDirFnode; 

// 

OC 

BYTE bReserved2[OxlFO]; 

// 

10 


} SuperBlockType; 
// 


/***************************************************************************■ j 

/* global variables */ 

static struct diskinfo_t Disklnfo; 

static PartitionEntry ‘HPFSPartition; 

static USHORT BytesPerSector « sizeof (VolumeBootSector); 

static USHORT SectorsInFulITrack; 

static USHORT SectorsInSegment; 

static USHORT HugeShift; 

static RSN RootDirSector; 

static EntryFnodeType~r DirFnode; 

static DirectoryClusterType DirectoryCluster; 

static SuperBlockType SuperBlock; 

static union { 

FragmentedFileTableType ManyFragsFnode; 

EntryFnodeType FewFragsFnode; 

} FileFnode; 

static USHORT Level = 0; 
static ULONG FileSize; 
static char FileBuff[CHUNK]; 

// 

J***************************************************************************j 

/* function definitions */ 

I ★★*★★*★**★★★*★**★*★★★★*★★**★★*★*★★*★*★★*★★★*★★★★★*★★★******★★*★*★★****★★★★★ j 

void _bios_disk_with_retry (struct diskinfo_t *Info); 
void DoFewFrags (EntryFnodeType *Fnode); 
void DoManyFrags (FragmentedFileTableType ‘FTable); 
void DoSectors (ULONG FragSize, RSN FragSector); 

BOOL FindDirEntry (char ‘EntryName, DirEntryType “Location); 

void FindFile (const char ‘path); 

void FindFileFnode (char *); 

void GetBootRecords (void); 

void GetRootDir (void); 

void GetRelativeSectors (RSN SectorLoc, USHORT SectorNum, void ‘Into); 
int main (int argc, char *argv[]); 

void MakeFilename (char ‘path, char ‘dir, char ‘filname); 

// 

// End of File 
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Disk Partitions 


The original intent behind partitioning a hard disk was 
to share a physical medium between different operating 
systems: perhaps DOS, XENIX, and CP/M-86. The different 
operating systems were not supposed to share data be¬ 
tween them. DOS could not (and still cannot) access non- 
DOS partitions. 

In DOS versions before 3.3, you could define only one 
partition as a DOS partition. The partition was limited to 


32Mb in size. Add-on companies introduced non-DOS parti¬ 
tions, accessed via a device driver. 

DOS 3.3 introduced an extended DOS partition, where a 
partition of any size can co-exist with a DOS partition, still 
limited to 32Mb. The extended DOS partition itself contains 
an extended partition boot record in its first sector. The 
partition book record resembles a volume boot record 
with a volume table, which may contain a DOS volume 
entry, again up to 32Mb, and a 
pointer to the next extended parti¬ 
tion. For a large disk, this chain may 
be long. 

Note that on a computer system 
with two physical disk drives (0 and 
1), the drive assignments would be: 

C - Bootable DOS partition on 
drive 0. 

D - DOS partition on drive 1. 

E - First extended partition 
volume on drive 0. 


Listing 2 


/ 

/* function main */ 

/***********************************★*************************************** j 

int main (int argc, char *argv[]) 

( 

union REGS Myregs; 


if (argc < 2) ( 
fprintf (stderr, 

"This program sends the contents of an HPFS file to standard\n" 
“output. This may be piped to a file or device.\n" 

"Usage: getfile <fi1ename>\n“ 

"where <filename is a fully qualified path without a drive\n" 
"specification.\n"); 
exit (N0 ARG); 


setmode (STDOUT, (int) 0_BI NARY); 


Myregs.x.ax - 0x4400; // 

Myregs.x.bx ■ STOOUT; 
intdos (&Myregs, iMyregs); 

Myregs.h.dh ■ 0; 

Myregs.h.dl |* 0x20; // 

Myregs.x.ax 1 0x4401; // 

intdos (&Myregs, &Myregs); 
GetBootRecords (); 

GetRootDir (); 

FindFileFnode (strupr(argv[l])); // 


DoFewFrags (&FileFnode.FewFragsFnode); 
return (0); 


IOCtl Get Data 


Set raw mode 
IOCtl Set Data 


FileFnode will contain file fnode 


II 

********************i 
*1 

******************** j 


Disklnfo.drive - FIXED_DRIVE; 
Disklnfo.nsectors 1 1; 

Disklnfo.head * 0; 

Disklnfo.track ■ 0; 

Disklnfo.sector * 1; 

Disklnfo.buffer ■ &VolumeBootSector; 
_bios_disk_with_retry (&Di sklnfo); 


/* function GetBootRecords 

/.**,*.**......*.*,.*.*......***. 

void GetBootRecords () 

( 

PartitionEntry 'ThisPartition; 
unsigned MoreCyl; 


x - Last extended partition 
volume on drive 0. 

y - First extended partition 
volume on drive 1. 


2 - Last extended partition 
volume on drive 1. 

In OS/2 version 1.1 or higher, DOS 
version 4.0, Compaq DOS 3.31, Zenith 
DOS 3.3 Plus etc., the 32Mb limit per 
volume was lifted. A volume may 
be up to 2 32 sectors in size. Current¬ 
ly, with 512-byte sectors, this limit 
is 2 41 bytes, still above the available 
disk drive technology. The extended 
partition scheme, however, still ex¬ 
ists. It may be used to host both 
FAT and HPFS partitions on one 
physical drive. This would be the 
cheapest way to experiment with 
the HPFS. □ 


Page 32 - TECH Specialist 


July 1991 





Listing 2 —Cont’d 

HPFSPartition - NULL; 

for (ThisPartition 1 VolumeBootSector.Partitions; 

ThisPartition <* AVolumeBootSector.Partitions[3]; 
ThisPartition++) 

if (ThisPartition->SysInd =- HPFS_PART) ( 

HPFSPartition - ThisPartition; 
break; 

} 

if (HPFSPartition ■* NULL) { 

fprintf (stderr, "No HPFS partition found, aborting..An"); 
exit (BAD DISK); 

1 

Disklnfo.head - HPFSPartition->BH; 

MoreCyl * HPFSPartition->BS A OxCO; 

MoreCyl * MoreCyl « 2; 

Disklnfo.track - HPFSPartition->BCyl + MoreCyl; 

Disklnfo.sector - HPFSPartition->BS A 0x3F; 

Disklnfo.buffer - APartitionBootSector; 

_bios_disk_with_retry (ADisklnfo); 


) 

// 


BytesPerSector * PartitionBootSector.BytesPerSector; 
SectorsInSegment - (USHORT) (OxlOOOOUL / (ULONG) BytesPerSector); 
HugeShift - 0x1000; 

SectorsInFullTrack - PartitionBootSector.SectorsInTrack * 

PartitionBootSector.NumOfHeads; 


/* function GetRootDir */ 
/* Correct for OS/2 1.2 on ST-251 disk */ 
/***************************************************************************/ 
void GetRootDir (void) 

{ 


GetRelativeSectors (SUPERBLOCK, 1, ASuperBlock); 
GetRelativeSectors (SuperBlock.RootDirFnode, 1, ADirFnode); 
RootDirSector * DirFnode.FragTable.FewFrags[0].ulFragSector; 


} 

// 


/* function FindFileFnode */ 

/* Puts the file Fnode in FileFnode */ 

Ji k**************************************************************************/ 


void FindFileFnode (char "Fname) 


USHORT flast; 

GetRelativeSectors (RootDirSector, 4, ADirectoryCluster); 
flast - strlen (Fname) - 1; 

if (Fname[flast] ** '.') // OS/2 directories do not contain ending 

Fname[flast] * 0; // period of file names 

FindFile (Fname); 

FileSize * FileFnode.FewFragsFnode.ulcFileLength; 

) 

// 

/***************************************************************************/ 
/* function FindFile */ 

/a**************************************************************************/ 

void FindFile (const char "path) 

( 

char PathCopy [_MAX PATH]; 
char Element [_MAX FNAME]; 

BOOL Result; 

DirEntryType "CurrDirEntry; 

RSN SectorNum; 

Level++; 

_fstrcpy (PathCopy, path); /* Make local copy */ 

MakeFilename (PathCopy, PathCopy, Element); /* Split and update */ 
if (PathCopy[0]) // At least 'V left in path 

PathCopy[strlen (PathCopy) - 1] » 0;// Erase the 'V 
if (PathCopy[0] 1* 0) // More than 'V 

FindFile (PathCopy); // continue recursively 

Result - FindDirEntry (Element, ACurrDirEntry); 
if (Result !> TRUE) ( 

fprintf (stderr, "Could not find As, aborting..An", path); 
exit (NO FILE); 

) 


You should link the program with at 
least 8K of stack space. Long paths may 
require more space, due to the recur¬ 
sion used in several places. 

Data Structures 

The various data structures men¬ 
tioned in the article are defined in List¬ 
ing 1. Note the ipragma pack () that 
makes the C compiler pack all struc¬ 
tures rather than pad entries to a word 
or double-word boundary. 

Program Flow 

The function main() starts with set¬ 
ting the standard output file to binary 
mode in order to prevent the C runtime 
function write() from converting line¬ 
feeds into carriage-return/line-feed 
pairs. It also uses the DOS IOCTL Set 
Mode function (via intdosO) to set the 
file to RAW mode, which allows writing 
the control codes A S, A Q and A Z to 
standard output 

The function GetBootRecordsf) then 
reads the hard disk boot sectors. The 
function analyzes the partition table in 
the volume boot sector and locates the 
HPFS partition. 

Next, the function GetRootDir() lo¬ 
cates the root directory via the super 
block. The root directory is read from 
the disk, and the file FNODE is located 
by a recursive search for the file path. 
Finally, the file fragments are read and 
written to standard output. 

Points Of Interest 

The program returns a value 0-4, 
which may be checked by the DOS er- 
rorlevel batch variable. A return value 
of zero means success, une indicates 
that no filename parameter was sup¬ 
plied. Two signifies that no HPFS parti¬ 
tion was found. Three means that the 
file given could not be found. Four tells 
that an I/O error was encountered, 
either reading from the disk or writing 
to standard output. 

Function _bios_disk_with_retry() 
accesses the disk through the Microsoft 
C runtime library function 
_bios_disk(). This call translates to a 
BIOS lot 13 call. 

To find a directory entry, the length 
and contents of the item searched for 
and of the entry being tested must 
match. The function FindDirEntry() 
first compares lengths. The comparison 
on content uses the smaller of the two 
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lengths to decide if a split down the 
tree is in order. 

Directory entries do not contain a 
terminating (period). If a file or sub¬ 
directory ends with a period, it is dis¬ 
carded by MakeFi leName(). □ 
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Listing 2 — Cont’d 

if (Level > 1) ( // Directory 

if ((CurrDirEntry->bFlags & FLAG_DIR) -= 0) { 

fprintf (stderr, “%s is a file, not a directory. Aborting..An", 
path); 
exit (NO FILE); 

) 

) else ( /* File name */ 

if ((CurrDirEntry->bFlags & FLAG_DIR) !- 0) ( 

fprintf (stderr, "%s is a directory, not a file. Aborting..An", 
path); 
exit (NO FILE); 

) 

) 

if (Level > 1) ( // Directory fnode 

GetRelativeSectors (CurrDir£ntry->ulPointedSector, 1, &DirFnode); 
SectorNum = DirFnode.FragTable.FewFrags[0].ulFragSector; 
GetRelativeSectors (SectorNum, 4, &0irectoryCluster); // Directory body 
) else 

GetRelativeSectors (CurrDirEntry->ulPointedSector, 1, &Fi1eFnode); 

Level — ; 

) 

// 


/******************************* ********************************************J 

/* function FindDirEntry */ 

/* Assumes that correct directory cluster is in DirectoryCluster */ 

/***************************************************************************/ 
BOOL FindDirEntry (char ‘EntryName, DirEntryType ‘"Location) 

{ 

BYTE EntryNameLength, CmpLen; 

DirEntryType ‘TmpLoc; 
int UpDownLen, UpDown; 

RSN SectorNum; 


EntryNameLength - (BYTE) strlen (EntryName); 
for (TmpLoc = &DirectoryCluster.FirstDirEntry;;) ( 

if (EntryNameLength > TmpLoc->bcNameLength) ( // Compare lengths 
CmpLen » TmpLoc->bcNameLength; 

UpDownLen * UP; 

} else { 

CmpLen = EntryNameLength; 
if (EntryNameLength < TmpLoc->bcNameLength) 

UpDownLen * DOWN; 
el se 

UpDownLen = SAME; 

} 

UpDown = memcmp (EntryName, TmpLoc->bName, CmpLen); // Compare contents 
if (UpDown ** SAME) // Contents same 

UpDown = UpDownLen; // Judge by length 

if (UpDown == SAME) ( // Identical 

‘Location * TmpLoc; 
return (TRUE); 


I // Where to look now? 

if (UpDown < 0) ( // Try down? 

if ((TmpLoc->bSplitFlag A DIR_SPLITS) -■ 0) // No connection 

return (FALSE); // File not there 

SectorNum • *(RSN *) // Find connection 

(((BYTE *) TmpLoc) + TmpLoc->uscDirEntrySize - 4); 
GetRelativeSectors (SectorNum, 4, &DirectoryCluster); 

TmpLoc * &DirectoryCluster.FirstDirEntry; 
continue; 


) //Try same level 

if ((TmpLoc->b$plitFlag & END_0F_0IR) 1= 0) // No more here 

return (FALSE); // File not there 

TmpLoc - (DirEntryType *) // Next Entry 

(((BYTE *) TmpLoc) + TmpLoc->uscDirEntrySize); 


) 

// 


^***************************************************************************j 

I* function MakeFileName */ 

/***************************************************************************/ 
void MakeFilename (char ‘path, char *dir, char ‘filname) 

( 

char drive[_MAX_DRIVE], NDir [_MAX_DIR], ext[_MAX_EXT]; 

_splitpath (path, drive, NDir, filname, ext); 
if ((ext[0] != 0) && (ext[l] 1= 0)) 
strcat (filname, ext); 

strcpy (dir, NDir); // Caller may use same argument for "path" and "dir" 
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Listing 2 — Cont’d 

} 

// 


y ***************************************************************************i 
/* function DoFewFrags */ 


void DoFewFrags (EntryFnodeType *Fnode) 

( 


ULONG FragSize; 
RSN FragSector; 
USHORT i; 


if ((Fnode->bFragFileInd & MANY_FRAGMENTS) *• 0) { // Few fragments 
for (i - 0; FileSize 1= 0; i++) { 

FragSize ■ Fnode->FragTable.FewFrags[i].ulcFragSectors * 

0x200; 

if (FragSize > FileSize) 

FragSize ■ FileSize; 

FileSize -■ FragSize; 

FragSector = Fnode->FragTable.FewFrags[i].ulFragSector; 
DoSectors (FragSize, FragSector); 

) 

) else ( 

for (i = 0; FileSize != 0; i++) ( 

GetRelativeSectors (Fnode->FragTable.ManyFrags[i].ulFragSector, 
4, 

iFileFnode); 

DoManyFrags (AFileFnode.ManyFragsFnode); 

) 

} 

} 

// 


^***************************************************************************i 

/* function DoManyFrags */ 

^***************************************************************************J 

void DoManyFrags (FragmentedFileTableType *FTable) 

{ 

ULONG FragSize; 

RSN FragSector; 

USHORT i; 

if ((FTable->bFragFileInd & MANY_FRAGMENTS) == 0) {// Few fragments in 

// this cluster 

for (i = 0; (FileSize != 0) && (i < FTable->bcFragNum); 1++) { 

FragSize = FTable->FragTable[i].ulcFragSectors * 0x200; 

if (FragSize > FileSize) 

FragSize » FileSize; 

FileSize -= FragSize; 

FragSector = FTable->FragTable[i].ulFragSector; 

DoSectors (FragSize, FragSector); 

} 

} else ( 

for (i = 0; (FileSize != 0) && (i < FTable->bcFragNum); i++) ( 
GetRelativeSectors (FTable->FragTable[i].ulFragSector, 

4, 

AFileFnode); 

DoManyFrags (&Fi1eFnode.ManyFragsFnode); 

} 

} 

GetRelativeSectors (FTable->ulParentSector, 4, iFileFnode); 

) 

// 



void DoSectors (ULONG FragSize, RSN FragSector) 
{ 


USHORT Chunk, ChunkSectors; 
while (FragSize > 0) ( 

Chunk = (USHORT) min ((ULONG) CHUNK, FragSize); 
ChunkSectors = (Chunk + OxlFF) / 0x200; 

GetRelativeSectors (FragSector, ChunkSectors, FileBuff); 
if ((unsigned) write (STD0UT, FileBuff, Chunk) != Chunk) ( 
perror (“Error writing to STD0UT"); 
exit (I0ERR); 

} 

FragSize -= Chunk; 


HI-SCREENProir 

New Object Oriented Version 
For Poworfvl User Interfaces 

Our new HI-SCItfEN Pro II is an integrated 
environment for tree ing and managing user 
interfaces for your programs. 

> Built-in editors allow you to interactively 
generate objects (windows, menus, icons, 
mouse cursors, graphs, help screens, etc.) 

>- Your programs con easily manipulate these 
objects, using a set of powerful functions. 

>- You can test all objects directly under the 
editor in any graphic mode (Hercules, CGA, 
EGA, VGA). 

► New features include: New Icon Editor • 

New Menu Generator • New Graph Editor • 
New Library Generator • Enhanced scrolling 
(automatic scroll boxes) • 25/30/43/50 
line mode support • Enhanced data 
validation • etc. 



>- Includes linkable modules for C, Pascal, 
Clipper and Quick Basic. 


HI-SCREEN Pro II.$395 

Upgrades.Call 


30 day money-back guarantee • No royalties 


1-800-338-2852 

Tel.: 415-896-0708 • Fax: 415-896-0709 

Softway, Inc. 

185 Berry Street, Suite 5411, 

San Francisco, CA 94107 
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Listing 2 — Cont’d 


Debug 

C 

What’s your problem? 

• program hanging? 

• memory overwrites? 

• operating system overwrites? 

• corrupted heap? 

• memory leaks? 

• dangling pointers? 

• open file pointers? 

• invalid calls to free() ? 

If your code has a bug that’s 
making you sick, call the 
doctor —Dr. MD, the run time 
memory debugger for C! Sure, you 
could find it yourself, but how much 
would it cost you in time, money and 
aggravation? 

Dr. MD is the easy and cost 
effective way to cure your memory 
corruption ills. Dr. MD gives a 
complete diagnosis including the 
source file and line number of your 
bug. 

• includes source code 

• nonobtrusive 

• easy to customize 

• hardware independent (386not 
required) 

• operating system independent 
(DOS, UNIX, OS/2...) 

• small library 


FragSector +■ ChunkSectors; 

) 

) 

// 

/*************************************************************************x*/ 

/* function GetRelativeSectors */ 

Ij 

void GetRelativeSectors (RSN SectorLoc, USHORT SectorNum, void *Into) 

( 

RSN SectorsToLoc; 

ULONG TempLONG; 

USHORT RoomlnSegment; 

SectorLoc +* HPFSPartition->PartitionOffset; 
while (SectorNum) { 

SectorsToLoc * SectorLoc; 

Oisklnfo.track ■ (USHORT) (SectorsToLoc / SectorsInFulITrack); 

SectorsToLoc -= (ULONG) Disklnfo.track * (ULONG) SectorsInFullTrack; 

Oisklnfo.head = (USHORT) (SectorsToLoc / 

PartitionBootSector.SectorsInTrack); 

TempLONG - 1L + SectorsToLoc - (ULONG) Disklnfo.head * 

(ULONG) PartitionBootSector.SectorsInTrack; 

Disklnfo.sector * (USHORT) TempLONG; 

Disklnfo.buffer = Into; 
if (SectorNum + Disklnfo.sector «■ 

PartitionBootSector.SectorsInTrack + 1) 

Disklnfo.nsectors * SectorNum; 
else 

Disklnfo.nsectors = PartitionBootSector.SectorsInTrack 
- Disklnfo.sector + 1; 
if ((FP OFF (Into)) == 0) 

RoomlnSegment * SectorsInSegment; 
el se 

RoomlnSegment = (USHORT) ((OxlOOOOUL - (ULONG) FP_0FF (Into)) 

/ BytesPerSector); 
if (Disklnfo.nsectors > RoomlnSegment) 

Disklnfo.nsectors = RoomlnSegment; 

_bios_disk_with_retry (&Disklnfo); 

SectorNum -= Disklnfo.nsectors; 
if (SectorNum) { 

FP OFF (Into) += Disklnfo.nsectors * BytesPerSector; 
if~(FP OFF (Into) -- 0) 

FP_SEG (Into) +* HugeShift; 

SectorLoc += Oisklnfo.nsectors; 

) 

) 

1 

// 


Start your code on the road to 
recovery—order your copy today! 

DR. MD™ 

NEW version 2.0 
$ 129.00 plus shipping 

RSS Engineering 

Custom and Contract 
Software Solutions 


2683 N. Taft 

Loveland, CO 80538 USA 
(303)669-3300 
FAX (303) 669-3354 

RSS Engineering 

a division of 

Remote Switch Systems, Inc. 



^***************************************************************************j 

/* function _bios_disk_with_retry */ 

I ***************************************************************************j 

void bios disk with_retry (struct diskinfo t *Info) 

( 

union REGS regs; 
unsigned RetCode; 

if (_bios_disk (DISKREAD, Info) >> 8) ( 
regs.h.dl * (BYTE) Info->drive; 
regs.h.ah 1 6; /* Reset drive */ 
int86 (0x13, tregs, Sregs); 

RetCode - bios disk ( DISK READ, Info) » 8; 
if (RetCode !' 0) ( 

fprintf (stderr, "Error %u in low level disk read, aborting...\n", 
RetCode); 
exit (10_ERR); 

1 

1 

) 

// 


// End of File 
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An Animated Busy Cursor 
For Windows 3.0 

Alex Leavens 

For the user, a Windows program that provides no feedback during 
long processing operations is frustrating. The static hourglass cursor can 
make the user wonder whether the program is still doing something or 
if the machine is hung. However, with a little extra programming work, 
the Windows developer can hook an animated “busy” cursor into our 
program. Instead of a static picture of an hourglass, the user sees a 
stop watch with a spinning second hand. Although the cursor doesn't 
tell the user how long the operation will take, it does indicate that the 
program is still active, and doing something. 

The key to providing an animated cursor lies in Windows’s support 
of a programmer-definable cursor. Rather than using one of the 
predefined Windows cursors, you can substitute one (or more) cursors 
that you have created, either using one of the cursor-editing programs 
currently on the market, or by hand-coding the image into the ex¬ 
ecutable and building the cursor image on the fly. The second method 
is more technically challenging and does not yield any additional 
functionality. Indeed, because the programmer usually must create cur¬ 
sor images with a pencil and a sheet of graph paper, hand-coding is 
much more time-consuming than using an editor. However, both 
methods require the programmer to go through the same steps to 
create an animated cursor. 

Creating The Cursor 

The first step in creating an animated cursor is to create each of the 
images that comprise it This process closely resembles the technique 
that the cartoon industry has used for years: "cell animation”. A car¬ 
toon animator paints or draws a sequence of closely-related images on 
sheets of clear acetate (known as cells), one image per sheet. Next, 
these images are photographed one after the other onto movie film. 
When the film is played back, the viewer’s mind blends the images 
into a smooth, seamless image of, say, Daffy Duck jumping up and 
down in the woods. 

The cell animation process merits close inspection because a num¬ 
ber of points about making cartoons prove equally important in 
designing an animated cursor for the computer. The first is that the 
animator paints only the foreground image (Daffy’s body). The back¬ 
ground (the woods) is a much larger static picture that rarely changes. 
The foreground image is laid on top of the background image to give 
the appearance of Daffy being in the woods. The cells’ transparent 
plastic lets the background show through the clear portions of the cell. 
This is equally true in the case of the Windows cursor. Unless the 
programmer explicitly defines part of the cursor as white or black, it 
will be clear, thus letting the background (i.e., the desktop or the ap¬ 
plication window) show through. 

A/ex Leavens has more than 10 y ears of GUI design experience 
under numerous API's, including both GEM and Windows. He currently 
has several Windows applications under development, and can be 
reached at ShadowCat Technologies, Suite 741, 39120 Argonaut Wag, 
Fremont, CA 94538 
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Listing 1 (cursor.h) 

/* 

* Important variables and defines for the Animated Cursor demo program 
*/ 


/* 

* Make the instance and main window handles available to all 

* procedures in all modules. 

*/ 

extern HANDLE hlnst; 
extern HWND MainhWnd; 

/* 

* Function prototypes 
*/ 

int PASCAL WinMain(HANDLE,HANDLE.LPSTR,int); 
long FAR PASCAL MainWndProc(HWND,unsigned,WORD,LONG); 

BOOL CurRegisterClass(HANDLE); 

HWND CurCreateWindow(HANDLE); 

BOOL FAR PASCAL QuitFuncfHWND, unsigned , WORD, LONG); 

BOOL FAR PASCAL SetSpeed(HWND, unsigned , WORD, LONG); 

BOOL FAR PASCAL Animate(HWND, unsigned , WORD, LONG); 


/* 

* Defines for each of the menu id's 
*/ 


Idefine IDM Animate 

4000 

Idefine IDM Speedl 

4001 

#define IDM Speed2 

4002 

Idefine IDM Speed3 

4003 

Idefine IDM Speed4 

4004 

Idefine IDM_Quit 

4005 

/* End of File */ 



Listing 2 (cursor.c) 

/* 

* Main windows routines for the Animated Cursor Demo Program 

★ 

* Written by Alex Leavens, for ShadowCat Technologies 

* 

* Created: 10/May/91 

* Revised: 14/May/91 

* 

*/ 


linclude <WINDOWS.H> 
linclude "CURSOR.H" 

/*- Function prototypes -*/ 

long FAR PASCAL HandleCursorSet(HWND, unsigned, WORD, LONG); 

/*- Global Variables -*/ 

HANDLE hlnst « 0; /* Handle to the instance of our program */ 

HWND MainhWnd= 0; /* Handle to the main window of our program */ 

j *★★**★*★★*****★★★★★★★***★*★ 

* 

* WinMain() 

* Entry point for any windows program. 

* 

*/ 

int PASCAL 

WinMain(HANDLE hlnstance, /* Current instance of program */ 

HANDLE hPrevInstance, /* Any previous instance of the program */ 

LPSTR lpCmdLine, /* Pointer to any command line args */ 

int nCmdShow) /* Show window type (open or iconic) */ 

f 


The second important point to note 
is that non-moving objects must remain 
in the same place from cell to cell. For 
example, if Daffy's body is located two 
inches from the top and two inches 
from the right on the first cell, it must 
be drawn in the same place on sub¬ 
sequent cells. Otherwise, Daffy's body 
will appear to jump around on the 
screen, ruining the animated effect In 
designing the animated cursor, you 
must make sure that any static parts of 
the image - those parts that do not 
change from picture to picture - occur 
in the same place in each image. In the 
example that I've provided, I created 
the static portion of the image (the 
body of the stop watch) first, leaving 
the center portion empty. I then added 
the animated portion (the spinning 
second hand) to this base image and 
saved the results in a series of files (see 
the cursor images in Figure 1). 

The third important point is that 
using many images provides a 
smoother, less blocky appearance than 
using just a few images will. Note the 
fact that very good animated cartoons 
(such as the early Warner Brothers or 
Disney cartoons) were created with be¬ 
tween 12 and 24 images per second. 
The change in the image between any 
two frames was very small, and as a 
result, the animation looked very 
smooth and fluid. In contrast, current 
Saturday morning cartoons have only 
two or three images per second of film. 
The movement of the image between 
frames is much larger, and hence much 
blockier. The same holds true for the 
cursor images - the more images you 
use, the smoother the animation will 
appear. Using fewer images saves a lit¬ 
tle space (a 32-by-32 pixelcursor image 
occupies 256 bytes, plus a small 
amount of header information), but at 
the cost of making the animation block¬ 
ier and less satisfying. 

The Sample Application 

The key ingredient to hooking the 
cursor images to the application pro¬ 
gram is the Windows API call, Set- 
Cursor(): 

HCURSOR SetCursor(hCursor) 

The SetCursor() routine takes the 
handle to a cursor resource, which 
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Listing 2 — Cont’d 


MSG msg; /* Messages from the system */ 

/*.V 

hlnst = hlnstance; /* Save current Instance */ 

if (IhPrevInstance) /* Is there an other instance of the task */ 

( 

if (ICurRegisterClass(hlnstance)) 

return FALSE; /* Punt if Class registration failed */ 

) 

MainhWnd = CurCreateWindow(hlnstance); 

if (IMainhWnd) /* If we couldn't create the window, punt */ 

return FALSE; 

ShowWindow(MainhWnd, nCmdShow); /* Show the window */ 
UpdateWindow(MainhWnd); /* Send WM_PAINT message to window */ 

SendMessage(MainhWnd, 

WM_COMMAND, 

IDMSpeedl, 

(LONG)O); /* Send speedl a message to check itself */ 

while (GetMessage(&msg, /* place to put message info */ 

0, /* get messages to all windows */ 

0, /* examine all messages, from lowest to */ 

0)) /* highest */ 

( 


TranslateMessage(&msg); /* Translates character keys */ 

DispatchMessage(&msg); /* Dispatches message to window */ 

) 

return(msg.wParam); /* Returns the value from PostQuitMessage */ 

) 

J ★★*★*★★★★★★★*★★★★*★**★★★★* 

★ 

* MainWndProc() 

* Handles the main event messaging loop that we use 

* to process windows messages. 

* 

*/ 

long FAR PASCAL 
MainWndProc(HWND hWnd, 

unsigned message, 

WORD wParam, 

LONG 1Param) 


switch (message) 

( 

case WM_SETCURSOR: /* Special cursor set message */ 

return HandleCursorSet(hWnd, 

message, 

wParam, 

1Param); 

break; 

case WM_DESTROY: /* Shutdown time... */ 

PostQuitMessage(O); 

return DefWindowProc(hWnd, message, wParam, 1Param); 
break; 

case WM_COMMAND: /* Command from main window (handles menus) */ 

switch(wParam) 

{ 

case IDM_Animate: 

Animate(hWnd,message,wParam,1Param); 
break; 

case IDM_Speedl: 
case IDM_Speed2: 
case IDM_Speed3: 
case IDM_Speed4: 

SetSpeed(hWnd,message,wParam,lParam); 
break; 

case IDM_Quit: 

QuitFunc(hWnd.message.wParam,1Param); 


THE FAST, FLEXIBLE 
EASY TO USE GUI 

TEGL WINDOWS TOOLKIT II 
The TEGL Windows Toolkit II is really 
three toolkits in one: a graphics inter¬ 
face, a memory manager and a window 
manager. Together they provide a pro¬ 
gramming environment. With the tools 
you get you can build a true event driven 
GUI for your DOS application. 


OUTSTANDING I KATURKS 


You get all these features and 
more for only $99: 

* Adds as little as 100 K to the size of an 
application. 

* Virtual memory management using 
EMS hard disk and handles. 

* Extensive keyboard, mouse and timer 
event hooks. 

* An icon editor to design and edit your own 
icons. 

* World coordinates make it easier to fit 
data to the screen. 

* TEGL graphics interface, a virtual plug¬ 
in replacement for BGI, but much faster 
and with special routines for windowing. 

* 40+ bit mapped fonts, some fonts support 
the complete IBM character set. 

* Font editor to create fonts up to 100 x 100 
pixels. 

* Dialogue management for easy data 
entry, pick lists, and messaging. 

* Turbo Pascal objects and Turbo C++ 
class library. 

* CGA, Hercules, EGA .VGA and SVGA 
support in 2, 16 and 256 colors. 

* Pascal version supports Turbo Pascal/ 
Quick Pascal. The C version supports 
Turbo C/C++, Quick C, Microsoft C and 
WATCOM C. 


WINDOW ROUTINES 


Fast scrolling in any direction, stan¬ 
dard character I/O, local menus, re- 
sizeable, scroll bars, headers, graphics 
clipping, CRT windows. 

The Complete Games Toolkit II 
Includes the TEGL Windows Toolkit plus com¬ 
plete source code for five games. The games are 
great examples of the use of the toolkit. Even in¬ 
cludes an electronic deck of cards to create your 
own card games. 


EXTRA BENEFITS 


No Royalties - Source Code Included 
30-day Money Back Guarantee 

Order today! (604)669-2577 

Fax (604)688-9530 

Visa/Mastercard/Cheque/Money Order 
TEGL Windows Toolkit II Release 2.0 
Pascal $99 C $99 
Complete Games Toolkit $139 
Shippings Handling $10 
Shipping outside Canada & U.S.A $15 
Canadian residents add 7% GST 

TEGL SYSTEMS CORPORATION 
780-789 West Pender Street, Vancouver 
British Columbia, Canada V6C 1H2 
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Listing 2 — Cont’d 

break; 

default: 

break; 

} 

break; 

default: /* Just let windows handle it... */ 

return DefWindowProc(hWnd, message, wParam, IParam); 
break; 


) 

return FALSE; /* Returns FALSE if processed */ 

} 

j *******************★**★*★** 

* 

* CurRegisterClass() 

* Registers the class for our main window. Done only if 

* there isn't another instance of the application already running. 

*/ 

BOOL 

CurRegisterClass(HANDLE hInstance) 


I 

WNDCLASS WndClass; /* Window class structure to fill in */ 

/*.*/ 

WndClass.style * 0; 

WndClass.lpfnWndProc * MainWndProc; 

WndClass.cbClsExtra * 0; 

WndClass.cbWndExtra - 0; 

WndClass.hlnstance - hlnstance; 

WndClass.hlcon = LoadIcon(NULL,IDI_APPLICATION); 

WndClass.hCursor = LoadCursor(NULL,IDC_ARROW); 


WndClass.hbrBackground * CreateSolidBrush(GetSysColor(C0L0R_WIND0W)); 
WndClass.lpszMenuName ■ "CURSOR"; 

WndClass.lpszClassName * "CURSOR"; 

return RegisterClass(SWndClass); 

) 

j *★****************************** 

★ 

* CurCreateWindow() 

* Creates the window for our application 
*/ 


HWND 

CurCreateWindow(HANDLE hlnstance) 


{ 

HWND hWnd; /* Handle to the created window */ 

int coordinate[4]; /* Coordinates of the window (use system defaults) */ 

/*.*/ 


coordinate[0]=CW_USEDEFAULT; 
coordinate[1]=0; 
coordinate[2]=CW_USEDEFAULT; 
coordinate^] =0; 

hWnd ■= CreateWindow("CURSOR", 

"Animated Cursor Demo Program", 


WS_OVERLAPPED | WS_THICKFRAHE | 
WSSYSHENU | WS_MINIMIZEBOX | 
WS_MAXIMIZEBOX, 


coordinate^], 
coordinate[l], 
coordinate[2], 
coordinate[3], 
0 , 

0 , 

hlnstance, 

(LPSTR)NULL); 

return hWnd; 

) 

/* End of File */ 


/* x position */ 

/» y position */ 

/* width */ 

/* height */ 

t* No parent to this window */ 

/* No children either... */ 

/* application instance... */ 
/* no additional data */ 


must be loaded using the Load- 
Cursorf) function. SetCursorf) returns 
a handle to another cursor, which is the 
handle to the previous cursor image. 

A problem arises, however, in that 
the SetCursorf) function ostensibly 
works only if the class cursor for our 
window has been set to NULL. If the 
class cursor has not been set to NULL, 
Windows will restore the previous cur¬ 
sor image each time the mouse is 
moved. However, setting the class cur¬ 
sor to NULL tells Windows that you are 
assuming total responsibility for main¬ 
taining the cursor image while it is in¬ 
side our window. No longer will Win¬ 
dows determine that the cursor is on a 
re-size border, and change the shape 
accordingly - you have to do it Taking 
total control of the cursor image means 
re-inventing all the code that already 
exists inside Windows for handling the 
default behavior of the cursor - an un¬ 
pleasant prospect, at best. Fortunately, 
there is another method that will 
process the cursor messages we’re in¬ 
terested in and have Windows process 
the rest. 

The first bit of prestidigitation this 
method requires is to intercept the 
NM_SETCURS0R message in your main 
window handling loop (see MainWnd¬ 
Proc () in Listing 2). Next, a handler 
routine, such as HandleCursorSetf) in 
Listing 3, must handle the messages 
generated by WM_SETCURS0R. 

HandleCursorSetf) In Detail 

HandleCursorSet() begins by check¬ 
ing if the cursor is in your window, with 
the test 

/* If not our window, 
don't change */ 
if (wParam != MainhWnd) 

return DefWindowProc(hWnd, 
message, wParam, IParam); 

If the cursor isn't in your window, 
then you simply return the default win¬ 
dows procedure, since you don’t want 
to change another application's cursor. 

Next, get the hitTest code from the 
low order word of IParam 

/* Get cursor pos in window */ 
hitTest = L0W0RD(IParam); 
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Listing 3 (supportc) 


* Support routines for the Animated Cursor Demo Program 

* Written by Alex Leavens, for ShadowCat Technologies 

* 

* Created: 10/May/91 

* Revised: 12/May/91 
*/ 


♦include <WIND0WS.H> 
♦include “CURSOR.H“ 


Local variables 


BOOL whirling; 
WORD whichWatch; 


WORD 

/*— 


speed; 


/* Cursor spinning or not */ 
/* Current watch value */ 

/* How fast to go... */ 

Function prototypes - 


void FAR PASCAL 
void FAR PASCAL 
void NEAR PASCAL 
void NEAR PASCAL 


Whirly(BOOL); 
SetCursorBusy(void); 
DisableMenuEntries(HWND); 
CheckSpeedMenufHWNO, WORD); 


j ****************************** 

* 

* Quit() 

* Quits the demo program 

* 

*/ 

BOOL FAR PASCAL 
QuitFunc(HWND hWnd, 

unsigned message, 

WORD wParam, 

LONG IParam) 

( 

PostMessage(hWnd, WM_CL0SE, 0, 0L); 
return TRUE; 

) 


************************ 


Set Speed 0 

Sets the speed to the desired setting 


BOOL FAR PASCAL 

SetSpeed(HWND hWnd, unsigned message, 

WORD wParam, LONG IParam) 

{ 

static int speeds[4] * ( 1000, 600, 400, 200 ); 
speed = speeds[wParam-lDM_Speedl]; 

DisableMenuEntries(hWnd); /* Uncheck all speed entries */ 

CheckSpeedMenufhWnd, wParam); 
return TRUE; 

} 

/.. 


* Animate!) 

* Plays the cursor animation back at the currently 

* selected speed. 

*/ 

BOOL FAR PASCAL 
Animate(HWND hWnd. 

unsigned message, 

WORD wParam, 

LONG 1Param) 

I 

int i; 

WORD j; 

WORD k; 

WORD foo; 

Whirly(TRUE); 

for (i = 0; i < 50; i++) 


) 


foo * 0; 

for (j - 0; j < speed; j++) 

( 

for (k - 0; k < speed; k++) 

{ 

foo++; 

) 

> 

Whirly(TRUE); 


Whirly(FALSE); 
return TRUE; 


* HandleCursorSet() 

* Handles the message when Windows wants to set the cursor. 

* 

* Arguments: 

* hWnd - handle to the window that the message is destined for 

* message - what the message is 

* wParam - points to the window handle that contains the cursor 

* IParam - in the loword: hit test code 

* in the hiword: mouse message number 

* 

* Returns: 

* TRUE if we processed the event 

* the return from DefWindowProcO if Windows handled the event 

* 

*/ 

long FAR PASCAL 

HandleCursorSet(HWND hWnd, 

unsigned' message, 

WORD wParam, 

LONG IParam) 


( 


int hitTest; 

if (wParam !• MainhWnd) /* If not our window, 
then don't change */ 

return DefWindowProcfhWnd, message, wParam, IParam); 
hitTest * LOWORD(IParam); /* Get cursor position within window */ 

if (hitTest I- HTCLIENT) /* If not in client area, let 

* Windows handle it. 

*/ 

return DefWindowProc(hWnd, message, wParam, IParam); 

if (whirling) /* Are we spinning the stopwatch? */ 

return TRUE; /* If yes, don't let Windows change the */ 

else /* cursor, otherwise, let Windows 

* handle the message. 

*/ 

return DefWindowProc(hWnd, message, wParam, IParam); 


* WhirlyO 

* Animates the busy cursor, and updates the index into which 

* image we'll need to use next. 


void FAR PASCAL 
Whirly(B00L hitWhirly) 

{ 

if (hitWhirly) 

whirling » TRUE; 

else 

{ 

whirling ■ FALSE; 
return; 

) 
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Listing 3 

— Cont’d 

SetCursorBusyO; 

void NEAR PASCAL 

CheckSpeedMenu(HWNO hWnd, 

whichWatch++; 

WORD entry) 

/ 

if (whichWatch > 7) 

i 

HMENU hMenu; /* Menu handle... */ 

whichWatch = 0; 

1 

hMenu = GetMenu(hWnd); /* Get handle to the menu */ 

!******************* 

CheckMenuItem(hMenu, entry, MF CHECKED); 

\ 

* SetCursorBusyO 

* Sets the cursor to one of 8 possible images of a stop- 

/* End of File */ 

watch; 


* when done in sequence, the stopwatch appears animated. 

* 

*/ 

Listing 4 (cursor.mak) 

void FAR PASCAL 

# 

# Makefile for the Animated Cursor Demo Program 

SetCursorBusyO 

# Written by Alex Leavens, for ShadowCat Technologies 

I 

HCURSOR loadCur; 

static char cursorName[] = “WATCH 

# 

comp= /c /AS /Os /Gsw /Zpe /D _WINDOWS /W2 

if(whichWatch >= 8) 
whichWatch * 0; 

cursorName[5] = '1' + whichWatch; 

ALL : CURSOR.EXE 

CURSOR.RES : CURSOR.RC CURSOR.H WATCH1.CUR WATCH2.CUR \ 

loadCur = LoadCursor(hInst,cursorName); 
if (loadCur != NULL) 

WATCH3.CUR WATCH4.CUR WATCH5.CUR WATCH6.CUR \ 

WATCH7.CUR WATCH8.CUR CURSOR.ICO 
rc -r CURSOR.RC 

SetCursor(loadCur); 

1 

CURSOR.OBJ ; CURSOR.C CURSOR.H 

f************************ 

* 

cl $(comp) CURSOR.C 

* DisableMenuEntries() 

SUPPORT.OBJ : SUPPORT.C CURSOR.H 

* Unchecks all of the speed settings in the menu 

cl $(comp) SUPPORT.C 

*/ 

CURSOR.EXE : CURSOR.OBJ SUPPORT.OBJ CURSOR.DEF CURSOR.RES 

LINK @CURSOR.LNK 
rc CURSOR.RES 

void NEAR PASCAL 

DisableMenuEntries(HWND hWnd) 


f 

HMENU hMenu; /* Menu handle... */ 

Listing 5 (cursor.def) 

hMenu = GetMenu(hWnd); /* Get handle to the menu */ 

CheckMenuItem(hMenu, IDM Speedl, MF UNCHECKED); 
CheckMenuItem(hMenu, IDM_Speed2, MF_UNCHECKED); 
CheckMenuItem(hMenu, IDH_Speed3, MF_UNCHECKED); 
CheckHenuItem(hMenu, IDM Speed4, MF UNCHECKED); 

} 

; Module definition file for the Animated Cursor Demo Program 
; Written by Alex Leavens, for ShadowCat Technologies 


NAME CURSOR 

DESCRIPTION 'Animated Cursor Demo Program by Alex Leavens' 

!************************** 

EXETYPE WINDOWS 

* 

STUB 'WINSTUB.EXE' 

* CheckSpeedMenu() 

DATA MOVEABLE MULTIPLE 

* Checks the requested speed menu entry 

CODE MOVEABLE DISCARDABLE PRELOAD 

* 

HEAPSIZE 1024 

*/ 

STACKSIZE 5120 

EXPORTS 


MainWndProc 


mm 




Figure 1 


..... . • • .. ■ • • 

The Eight Cursor 'Cells 1 


File 
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to determine the cursor's current posi¬ 
tion. To know whether the cursor is in 
the client area of the window (the por¬ 
tion of our window into which we nor¬ 
mally draw), the code uses the 
HTCLIENT value in the if statement. 
(This message comes from table 6.2 of 
volume 1 of the Windows 
programmer's reference manual, which 
lists all the possible areas in which the 
cursor can be), if the cursor isn't in the 
client area, you can again let Def- 
UindowProcf) handle setting the cursor: 

/* if not in client area, let 
Windows handle it 
*/ if (hitTest != HTCLIENT) 

return DefWindowProc(hWnd, 
message, wParam, IParam); 

Windows will now handle all the 
messages dealing with all non-client 
areas of the window, including such 
areas as the menu bar, the window 
sizer frame, the scroll bars, etc. 

The next few lines of code deal with 
setting the cursor to our spinning stop¬ 
watch: 

/* if spinning stopwatch, don't 
let Windows change cursor 
*/ if (whirling) 
return NULL; 

else /* else let Windows handle */ 
return DefWindowProc(hWnd, 
message, wParam, IParam); 


you don't actually do anything; you 
simply return a NULL value to the Win¬ 
dows event handler because Uhirlyf) 
has already set the cursor to one of the 
stopwatch images. At this point, you 
simply want to prevent Windows from 
overwriting the image. In the case 
where the stopwatch is not spinning, 
you let the DefUindowProcf) handle 
setting the cursor. 

UhirlyO takes one argument, a 
BOOL, which controls whether to show 
the stopwatch or not When passed a 
TRUE, UhirlyO updates the busy cur¬ 
sor, sets the variable whirling to TRUE, 
and updates the animation index used 
to determine which cursor image to 
show. When passed a FALSE, UhirlyO 
sets whirling to FALSE to stop spinning 
the stopwatch, and returns. 

SetCursorBusyO actually sets the 
cursor. The variable whichUotch tells 
which of the eight cursor images to 
load. You then load the appropriate cur¬ 
sor image, and, if the handle returned 
by LoadCursorf) is not NULL, set the 
cursor to the new image. It’s important 
to check LoadCursorf)' s return value, 
since under low memory conditions, 
the routine may fail. 

With the mechanics in place for sub¬ 
stituting the default cursor with your 
own, the final piece is actually causing 
the stopwatch to spin. You simply call 
UhirlyO from your code whenever 
you want to spin the stopwatch: 


/* Spin stopwatch */ 

Whirly(TRUE); 

} 

Whirly(FALSE); /* Turn stopwatch 
off */ 

The listings provide a complete 
sample program for testing an 
animated cursor. Listing 1 contains the 
function prototypes and definitions 
used by the program. Listing 2 shows 
the main program, including UinMainf) 
and the normal message loop. Listing 3 
contains support routines that do the 
work of animating the cursor. 

In the sample code I've provided, the 
menu entry Animate causes the watch 
to spin several times. In addition, there 
are several menu entries which vary 
the delay between calls to Uhirlyf)-, 
the more often Uhirlyf) is called, the 
faster the stopwatch will appear to 
spin. There are two drawbacks to rail¬ 
ing Uhirlyf) indiscriminately, however. 
The first is that spinning the stopwatch 
too fast loses the animation effect, 
since the brain does not have time to 
blend the images together into a whole. 
The image appears to jump fitfully, 
rather than rotate. Second, every time 
SetCursorf) is called with a new 
image, it briefly turns off the old cursor, 
generating a small, but noticeable, flash. 
If the cursor is repeatedly changed at a 
high rate of speed, it causes an annoy¬ 
ing flicker that makes the cursor dif¬ 
ficult to see. I don't have a hard and 
fast rule for determining how often to 
call Uhirlyf). Rather, it’s a rase of em¬ 
pirically testing the particular applica¬ 
tion, and seeing what looks best. (If a 
routine is tested so that Uhirlyf) looks 
good on a 486 based machine, then 
typically it will also look acceptable on 
slower machines; however, a setting 
that looks good on a 386 may appear 
too fast when run on a 486). 

By using an animated busy cursor, 
you provide the user important feed¬ 
back about the status of your program. 
Although this article presents a fair bit 
of work to provide what is, to the end 
user, a “little touch", it's important to 
remember that such little touches are 
often what distinguish a merely good 
program interface from a great one. □ 


The BOOL variable whirling is set by 
the routine Uhirlyf). When whirling 
is TRUE, the stopwatch is in motion. 
Oddly enough, when whirling is TRUE, 


Whirly(TRUE); /* Turn on stopwatch */ 
/* Begin long processing ... */ 
while (continue_processing){ 

/* Do processing here */ 


Compiling The Animated Cursor Example 

Listing 1: CURSOR.H - Definitions for CURSOR 
Listing 2: CURSOR.C - Main routine for CURSOR 
Listing 3: SUPPORT.C - Support routines for CURSOR 
Listing 4: CURSOR.MAK - Microsoft makefile for CURSOR 
Listing 5: CURSOR.DEF - Module definition file 
Listing 6: CURSOR.LNK - Microsoft link file for CURSOR 
Listing 7: CURSOR.RC - Resource script 

The following non-text files are supplied on this month's code listings disk: 

CURSOR.ICO - Simple icon for CURSOR application 
WATCH 1.CUR - 

- Eight stopwatch cursor resource files 

WATCH8.CUR - 
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Listing 6 (cursor.lnk) 

CURSOR SUPPORT .CURSOR.EXE ,/align:16 /NOD , LIBW SLIBCEW, CURSOR.DEF 


Listing 7 (cursor.rc) 


/* 

CURSES ICON CURSOR.ICO 

* Resource file for the Animated Cursor Demo Program 



* Written by Alex Leavens, for ShadowCat Technologies 

/* 


*/ 

* Menu resources 
*/ 


linclude <WIND0WS.H> 


linclude "CURSOR.H" 

CURSOR MENU 

BEGIN 


/* 

POPUP "File" 


* Cursor resources for our animated cursor 

BEGIN 


*/ 

MENUITEM 

"Animate", IDM Animate 


MENUITEM 

SEPARATOR 

WATCH1 CURSOR WATCH1.CUR 

MENUITEM 

"Speed 1 (lx) 11 , IDM Speedl 

WATCH2 CURSOR WATCH2.CUR 

MENUITEM 

"Speed 2 (10x)“, IDM Speed2 

WATCH3 CURSOR WATCH3.CUR 

MENUITEM 

"Speed 3 (100x)“, IDM Speed3 

WATCH4 CURSOR WATCH4.CUR 

MENUITEM 

"Speed 4 (lOOOx)", IDM Speed4 

WATCH5 CURSOR WATCH5.CUR 

MENUITEM 

SEPARATOR 

WATCH6 CURSOR WATCH6.CUR 

MENUITEM 

"Quit", IDM Quit 

WATCH7 CURSOR WATCH7.CUR 

END 


WATCH8 CURSOR WATCH8.CUR 

END 





C Communications Toolkit 

Now you can add professional serial communications to any C 
application. C Communications Toolkit makes it fast and easy. 
You don’t need to spend months writing, testing and debugging 
low-level device support, file transfer protocols and CRC rou¬ 
tines. 

Power 

Speed: up to 115,000 bps. 

Flow control: XON/XOFF, RTS/CTS, DTR/DSR. 

Interrupts: Receive, Transmit, Modem Status, Line Status. 

Modem Support: Full Hayes command set + Telebit & UDS extensions. 
Terminal Emulation: VT52, VT100. ANSI X3.64, ANSI.SYS. 

Full DCA/Intel CAS support (FAX and file transfer). 

Flexibility 

Supports an unlimited number of serial ports. 

Supports any I/O address and IRQ line. 

Log output and/or input to a printer. 

Capture output and/or input to a buffer and/or file. 

Multi-port board support for AST, Digiboard, Commtech, Arnet, etc. 

File Transfer 

Single file: ASCII. XMODEM. XMODEM-CRC, XMODEM-lk. 

Multi-file: YMODEM, YMODEM-g (for error-free links), 

KERMIT (with run-length encoding and 8th—bit prefixing extensions). 

Communications Chip Support 

INS8250/A/B, 16450. 

INS 16550/A (including FIFO buffers and interrupt threshold). 

Zilog Z-80 SIO/DART (async., SDLC, HDLC, BiSync). 

Documentation 

Over 200 functions. 600-page manual with 100 pages of Toolkit tutorial 
(build a powerful terminal program in easy stages), 125 pages of serial com¬ 
munications background and over 35 example programs. 

Supports: MSC 5.0+/Quick C, Power C v1.2+, Turbo C, V/atcom C. 

Full source code included — No run-time royalties. 30-day warranty. 

CALL (214) 226-6909 

FAX: (214) 226-0386 BBS: (214) 226-8088 



Magna Carta Software, 
Inc. 

P.O. Box 475594, 
Garland, TX 75047-5594 


0n| y $ 149.95 

(in TX add 8% sales tax) 

VISA/MC accepted 


for Programmers 

Analyze, Organize, Arrange 

Your source code environment 
With the 4c Hypertext facility! 

The 4c Hypertext facility saves you time and money. 

Change This 



Here’s how! 


✓ Analyze: 

The Analyzer maps and cross-references 
functions and variables to their respective 
path and file names. This cross reference 
table can be displayed alphabetically and by 
type of variable. It allows a programmer to 
edit functions directly without specifying a 
...---* --aid! 


Versions Now Available: 

- Classic Otis original wtth built In sdrioO 
• Brief (odd 4c capability to Brief) 
Windows (Windows 3.0 version of 4c) 


file name. A great documentation s 


60 Day Moneyback Guarantee! 

No copy protection! 

Free Technical Assistance! 

For C & Pascal Programming Languages. 
✓ Organize: with our ZOOM key! N ° Changes to source code required. 

-■ ---■—>— Mastercard. Visa. Cod. PO. or check 

Which instantly locates any function, global, 
variable, structure definition, tfdefine. or 
macro, etc., in any file, directory, and drive, 
and displays It in a new edit window. 


✓ Arrange: with our editor. 

Featuring multiple files, multiple windows, cut- 
and-paste between windows, search-and-replace. 
auto Indent, tab support, and a familiar user 
Interface with pull down windows, or 
own editor! 


: your 


Mastercard, Visa, Cod. PO, or check accepteq 
Only $119 US funds plus shipping. 

Call or Write Todayl 
Tri-Technology Systems, Inc. 
1000 Jorle Blvd., Suite 52 
Oak Brook, II. 60521 
1-708-366-7595 


□ Request 145 on Reader Service Card □ 


Editor Developers: 

Add 4c functionality to your Windows 3.0 editorl Call, regarding the 4c 
DDE Interface specification for your editor. 

Special with this ad only — $89 


□ Request 329 on Reader Service Card □ 
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TECH Tips 



Our first TECH Tip this month reminds me of those wonderful “Planned Ob¬ 
solescence” cartoons I used to read in MAD Magazine... 


EXE2BIN or Bust 


Vincent D. O'Connor 
29 Beech Court 
Babbitt, MN 55706 

Beginning with DOS v3.3, IBM moved the EXE2BIN program from the DOS program 
diskette to the disk that comes with the Technical Reference manual. This frustrated 
me, since I do use EXE2BIN occasionally, yet not often enough to warrant purchasing 
IBM’s manual just to be able to use it. 

A close examination of the version of EXE2BIN that comes with DOS 3.2 showed 
that it checks to see the version of DOS it’s running under, and if it’s any greater 
than 3.2, it exits with an "Incorrect DOS Version" error message. This is caused by a 
JZ instruction at offset 30D. If you change the JZ to a JMP, however, you can run 
EXE2BIN under DOS 3.3 or 4.01. You can easily do this using DEBUG (but don’t do it on 
the only copy of EXE2BIN you have, just in case you make a mistake). 

To make EXE2BIN usable, enter DEBUG with 

debug exe2bin.exe 

Then type 

e 30d eb 
w 

q 

and EXE2BIN will be patched and ready to use. 

Here is a clever technique to allow users to switch between behemoth applica¬ 
tions without tying up any of that valuable 640K main memory area (or any other 
kind of memory area, for that matter!). Mr. Goldberg's menu system is language- 
independent as well. 



Leor Zolman 


Please send us your best 
tricks and hacks — those 
clever pieces of code to 
make things work the 
way they should! You'll 
receive at least $50 for 
each tip that we print 

Send your submissions to: 
TECH Tips 
Leor Zolman 
2601 Iowa 
Lawrence, KS 66046 


A Memory-Efficient Menu Mechanism 

Daniel E. Goldberg 
DEG Consulting 
239 East 88, #1 
New York, NY 10128 

0KMENU and its companion file, MENU.COM (or MENU. EXE), are examples of an easy 
way to create menus that let you run large, memory-hungry applications. They are 
easy because the code is simple and the trick employed is simple; they let you run 
memory-hungry applications because they use OK of RAM to run the application. 



Leor Zolman bought his first microcomputer (an IMSAI8080) while in high school in LA., 
earned it to M.I.T., withdrew, and wrote the BDS C compiler with it in assembly language. 
That was enough assembly language hacking to last a lifetime, so now he enjoys 
UNIX/Xenix system administration, article writing, and raising his newborn daughter 
Katelyn. You can reach him at leor@rdpub.com or uunetlbdsoftlrdpublleor. 



























Listing 1 (okmenu.bat) 


@ECHO OFF 

REM OKMENU.BAT - loader for menu.com 
:START 

CLS 

MENU 

if errorlevel 255 goto ERROR 
if errorlevel 3 goto QUIT 
if errorlevel 2 goto EL_2 
if errorlevel 1 goto EL_1 

;E L _2 

ECHO. 

ECHO run second large (or small) program. 
ECHO. 

PAUSE 

GOTO START 

:EL 1 

ECHO. 

ECHO run first large (or small) program. 
ECHO. 

PAUSE 

GOTO START 

:ERROR 

error message displayed by MENU.COM 
ECHO. 

PAUSE 

GOTO START 

: QUIT 

ECHO. 

ECHO Hope you enjoyed the show. 

ECHO. 


Listing 2 (menu.c) 


/* Dan Goldberg, 2/91 */ 

/* MENU.C */ 

/* Menu program skeleton for quick and dirty menus. */ 
/* Good for work at client sites, for example */ 

linclude <stdio.h> 

main () 

{ 

int el; 

printf("\nYour Customer's Menu\n\n"); 
printf("1. First LARGE Program\n"); 
printf(“2. Second LARGE Program\n B ); 
printf("3. Quit\n“); 
printf("\nEnter Menu Choice »> "); 

scanf("%d",&el); 

If ( el «■ 3 ) 

_exit(el); 
else 

printf("\nlnvalid menu choice!\n“); 

_exit(255); 


/* End of File */ 


with ZMODEM and 
Data Decompression 




sync Professional is a full- 
featured object-oriented commu¬ 
nications toolkit that enables you to 
build powerful async applications 
faster and easier. Async Professional 
has all the stan¬ 
dard features 
you'd expect of 
an async toolbox. 

Plus the robust 
Zmodem transfer 
protocol, data 
decompression 
tools, and both 
object-oriented and proce¬ 
dural calling interfaces. 

You get ■ interrupt 
driven buffered I/O to 115K 
baud ■ Zmodem, Kermit, Xmodem, 
Ymodem protocols ■ Zip and Lzh data 
decompression ■ automatic flow 
control-XoN/XoFF, Cts/Rts, Dtr/Dsr 
■ ComI- Com8 support with up to 4 


ports open at once ■ 16550 buffered 
Uart support ■ hardware interrupt 
sharing on PS/2 ■ Ansi terminal 
emulation ■ modem control includ¬ 
ing Hayes, V.32, V.42, and Mnp5. 


Demo programs include a 
powerful multi-window comm 
program with menus, text 
editor, and mouse support, built 
using Object Professional, and 
a simple comm program that 
depends on no other products. 


Event logging and tracing op¬ 
tions create a time-stamped 
audit trail of all async 
interrupts and charac¬ 
ters sent or received. 

You'll debug your 


application faster without the need 
for special debugging hardware. 

Full Source, Documentation 

Async Professional includes com¬ 
plete documentation, pop-up help, 
free technical support on Compu¬ 
Serve and by telephone direct from 
the authors. You get full source code 
and pay no royalties. 

* Async Professional is an excellent 
series of routines...and very complete. 
It's better than anything I’ve seen in 
Pascal , C or assembler. ** 
Richard Wilkes, Author, TAPCIS 

Async Professional, 
only $139. 

Cal! toll-free to order. 
1 - 800 - 333-4160 


Satisfaction guaranteed or your money back within 30 days. Add $5 per 
order for standard shipping in U.S./Canada. Inquire about other shipping 
options. Includes both 5.25" and 3.5" disks. Registered LiteComm 
owners call for special upgrade offer. OOP units require Turbo 5.5 or 
6.0; non-OOP units require Turbo 5.0 or later. 


lira# 


9AM-5PM MST Monday through Friday, USA & Canada. 

For more information call (719) 260-6641. fax to 
(719) 260-7151, or send mail to CompuServe ID 76004,2611 
TurboPower Software PO Box 49009 Colorado Springs, CO 80949-9009 
© TurboPower Software 1991 
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This technique is not new or especially exciting, but it suits 
its purpose: quick, simple, and easy. The trick is to set DOS 
ERRORLEVELS based on the user’s menu choice. A "loader" 
named OKMENU.BAT (Listing 1) loads the command file, 
MENU. COM, to actually display a menu and prompt for a selec¬ 
tion. MENU. COM then exits to DOS and sets the ERRORLEVEL ac¬ 
cording to the user’s selection. Control then returns to the 
batch file, which tests for the error level and runs the ap¬ 
propriate program. After the chosen program is run, control 
again returns to the batch file and MENU.COM is reinvoked. 

Listing 2 shows a minimal C source listing for the MENU pro¬ 
gram. You can create a much fancier MENU. COM, with all the 
exploding pop-up windows, highlight bars, and bells and 
whistles you want. The example here is bare bones. It is just 
meant to convey the idea. With a little imagination, there are 
many things one can do by using DOS ERRORLEVELS. Every 
language (I believe) has some equivalent of the function I used 
with the C code. For example, Clarion, a superior database 
dialect, has a function GODOS() that is identical. So clearly you 
can write these kinds of menus in whatever language you 
choose. 


Yet More Cheap Ways 
to Display Numeric Values 

Gregg Jennings 
28 Cahoon Ct. #3 
Falmouth, MA 02540 
(508) 540-9711 

After reading Blake Millers’s letter in TECH Tips in the 
February 1991 issue, I remembered a print binary number 
routine that I wrote recently. By using the printd() function 
in The C Programming Language by Kernighan and Ritchie as 
an example, I came up with three functions to print numbers 
in hex, decimal, and binary, with and without leading zeros, 
which, it turns out, will work with any base from 2 to 36. 

The routines, which do not require the use of strings, are 
very small and quick. They should be useful in applications 
that must be small and fast and that do not require any other 
calls to printf(). They can easily be expanded to handle 
leading spaces, long integers, or signed numbers, or even to 
convert the numbers to a string. 



Listing 3 

/* 

putch(' '); 

* File: pnumbers.c 

1 

* Creator: Gregg Jennings 

newline; 

* Version: 1.0 February 1991 

) 

* Purpose: display formatted numbers to the console 

*/ 

/* 

♦include <stdio.h> 

* display a number to the console in any base from 

* 2 to 36, ASCII character set only 
*/ 

void pn(unsigned int n, int base) 

void lpn(unsigned int n, int length, int base); 
void pn(unsigned int n, int base); 

int getlen(unsigned int n, int base); 

( 

/* some MACRO examples */ 

if (n/base) 

pn(n/base,base); 

♦define paddr(n) 1pn(n,4,16),putch(':') 

putch((n%base>9) ? n%base+'A'-10 : n%base+'0'); 

> 

♦define phex(n) lpn(n,2,16) 


Idefine newline putch('\n'),putch('\r') 

* display a number to the console with leading zeros 

void main() 

* and a certain length, and any base from 2 to 36 
*1 

int i; 

void lpn(unsigned int n, int length, int base) 

/ 

1pn(123,16,2); /* display 123 dec in binary 

register int t; 

as if printf("%016b",123) would work */ 

for (t=length-getlen(n,base);t>0;t--) 

newline; 

putch('O'); 

pn(123,2); /* display 123 dec in binary */ 

pn(n,base); 

newline; 

) 

pn(123,8); /* octal */ 

newline; 

/* 

pn('\173',10); /* 173 oct in decimal */ 

* get the display length (number of digits) of a 

newline; 

* number, i.e. 100 dec returns 3, 64 hex (100 dec) 

paddr(123); /* display an address */ 

* returns 2 

newline; 

* 

phex('A'); /* display a hex value */ 

* used by 1pn() 

newline; 

*/ 

/* display the first 26 octal numbers */ 

int getlen(unsigned int n, int base) 

for (i=0;i<26;i++) ( 

( 

pn(i.8); 

int j; 

putch(' '); 

} 

for (j=l;n>=base;n/=base,++j) 

newline; 


/* display the first 21 base 3 numbers */ 

return(j); 

) 

for (i-0;i<21;i++) ( 
pn(i.3); 

/* End of File */ 

Numeric Display Routines 
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Listing 4 (disable.asm) 


PAGE 57,130 

TITLE ''Break and *C and Prtscn 
NAME BREAK 


; DESC: 

These routines disable and enable the special 
interrupt keyboard buttons. 

; INTERRUPTS: 

0x23 -'C 

OxlB -'Break 

0x05 Prtscn 

; REVISIONS: 

JT Jewell 91/01/28. 

; COMPILER: 

Microsoft Assembler Ver 5.10A 

; COMPILE: 

masm break.asm,break.obj; 

; ROUTINES: 

To call the routines from C: 

DISABLE BREAK(); 

2SSSSSS5SSSSSS 

ENABLE_BREAK(), 

:cccr:ci======i=r=r=::=rccs::===xr3srz====zxsss 

TEXT SEGMENT 

PUBLIC 'CODE' 

" ASSUME CS: 

TEXT 

ASSUME DS: 

"text 


PUBLIC DISABLE BREAK 


PUSH BP 
MOV BP.SP 

PUSH DS 
PUSH DI 
PUSH SI 
PUSH ES 

MOV AX. 3523H ; SAVE ORIGINAL 0x23 Handle. 

INT 21H 

MOV word ptr cs:0RG INT23,bx 
MOV word ptr cs:0RGjNT23+2,es 

MOV AX, 351BH ; SAVE ORIGINAL OxlB Handle. 

INT 21H 

MOV word ptr cs:0RG INTIB.bx 
MOV word ptr cs:0RG jNTlB+2,es 

MOV AX, 3505H ; SAVE ORIGINAL 0x05 Handle. 

INT 21H 

MOV word ptr cs:ORG INT05,bx 
MOV word ptr cs:0RG”lNT05+2,es 

MOV dx.seg TEXT:NULL_BREAK 
MOV ds.dx 

MOV dx,offset _TEXT:NULL_BREAK 

MOV ax,2523H ; SET INT 23H VECTOR 

INT 21H 

MOV ax,251BH ; SET INT 1BH VECTOR 

INT 21H 


. ****************************************** 


MOV ax,2505H ; SET INT 05H VECTOR 

INT 21H 


DISABLE BREAK PROC NEAR 
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POP ES 

pop si 
pop DI 

POP DS 
POP BP 
RET 


DISABLE_BREAK ENDP 

******************************************* 


PUBLIC JNABLEJREAK 
ENABLE_BREAK PROC NEAR 


PUSH BP 


MOV 

BP.SP 


PUSH DS 


PUSH DI 


PUSH SI 


PUSH ES 


LOS 

DX,cs:0RG 

INT23 

MOV 

AX.2523H " 


INT 

21H 


LDS 

DX,cs:0RG 

INT1B 

MOV 

AX.251BH ‘ 


INT 

21H 


LDS 

DX,cs:0RG 

INT05 

MOV 

AX.2505H " 


INT 

21H 


POP 

ES 


POP 

SI 


POP 

01 


POP 

DS 


POP 

BP 


RET 




; RETRIEVE PREVIOUS INT23 

; RETRIEVE PREVIOUS INTIB 

; RETRIEVE PREVIOUS INT05 


ENABLE BREAK ENDP 
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Listing 4 - Cont’d 

• ***************************★*★★****★******* 

NULL_BREAK PROC FAR 
IRET 

NULLJREAK ENDP 


. ******************************************* 

ORG INT23 dd 0 
0RG _ INT1B dd 0 
0RG~INT05 dd 0 


. ****************************************** 

TEXT ENDS 
END 

; End of File 


Listing 3 contains a sample calling program, the functions, and 
some utility macros to showcase the flexibility of those functions. 



Safeguarding Your AUTOEXEC.BAT 
Against Obnoxious Install Programs 


Thomas Nelson 
5004 W. ML Hope Rd. 
Lansing, Ml 48917 


Have you ever been bothered by commercial installation 
programs that automatically modify the contents of your CON¬ 
FIG.SYS and AUTOEXEC.BAT files? You may have spent quite 
some time tuning them to just the right configuration, only to 
have them corrupted by an INSTALL.EXE that thinks it knows 
more than you do. Many of these install routines will modify 
these files without even prompting you first. I suppose they 
must assume that they’re working with the lowest common 
denominator - the computer “illiterati.” 

One solution is to write AUTOEXEC.BAT as a dummy file, the 
only function of which is to call your real configuration file. 
The AUTOEXEC.BAT file will then look something like this: 

C: /sys/startup 

This version of AUTOEXEC.BAT does nothing except execute 
your configuration file named STARTUP.BAT in the C:\SYS direc¬ 
tory (at this point the entire explicit pathname of the batch 
file must be given, because no PATH statement has yet been 
executed.) When an installation program writes lines to 
AUTOEXEC.BAT, those lines will only appear at the end of the 
dummy file. They will never be executed because STAR¬ 
TUP.BAT does not return to the dummy file that invoked it. 
You then have a chance to examine the dummy file for any 
changes made, and either reject those changes or add them 
to STARTUP.BAT. I hope you won’t run across an INSTALL.EXE 
that’s smart enough to know it's being fooled and tries to 
modify STARTUP.BAT\ 


Tired of the CONFIG.SYS shuffle? 


Let BOOTCON simplify your life. 

"... it's bulletproof... The interface is well thought out. You need this program ." 

Dr. Jerry Pournelle, Byte, July 1990 

"Highly recommended." 

John C. Dvorak, PC Magazine, July 1990 

How many CONFIG.SYS and AUTOEXEC.BAT combinations do you have on your PC? BOOTCON eliminates 
the confusion by storing all your configuration information in just one set of configuration files. Each time you 
boot your PC you can select the configuration you want to use from a menu of up to 26 choices. 

BOOTCON is ideal when you need to use conflicting programs such as Windows 3.0, QEMM/386, 386MAX, 
Soft-ICE, and Lotus 123. A default configuration will automatically be used if you do not make a selection 
within the specified time-out period. BOOTCON also provides an optional password protection feature. 

BOOTCON lists for $59.95 and comes on both 5Vi" and 
3Vi" disks. It has an unconditional 30-day money-back 
guarantee. MS-DOS or PC-DOS 3.10 or later is required. 

115 West California Blvd., Suite 113 

Pasadena, CA 91105 Phone (818) 440-9104 FAX (818) 440-9240 

Windows and MS-DOS arc trademarks of Microsoft Corporation. PC DOS • a trademark of International Business Machine* Corporation. QEMM/386 is a trademark of Quarterdeck 

Office Systems. 386MAX is a trademark of Quaiitas Corporation. Soft-ICE » a trademark of Nu Mega Technologies. Lotus and 123 are trademarks of Lotus Development Corporation. 
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Listing 5 

linclude <dos.h> 
linclude <bios.h> 
linclude <stdio.h> 
linclude 'signal.h> 
linclude <stdlib.h> 
linclude 'process.h> 

extern disable_break(); 
extern enable_break(); 

main() 

( 

int end_of_job * 0; 
int c * 0; 

printf(“\nStart of job..."); 

DI$ABLE_BREAK(); 

while (! end_of_job) 

( 

if (IkbhitO) 

( 

c - getch(); 
printf; 
if (c « 'Z') 

end of job ■ 1; 

} 

} 

ENABLE_BREAK(); 

printf(''\nEnd of execution.\n"); 

) 

/* End of File */ 


Test Program for disable.asm 




QuikByte Pascal 

Turbo Pascal 

MS QuickPascal 


sec 

Bytes 

sec 

Bytes 

sec 

Bytes 

Sieve 

4.4 

1682 

9.2 

2480 

11.6 

3824 

Whetstone 

12.9 

6352 

73.9 

14944 

60.4 

15456 

Quicksort 

3.8 

1866 

5.5 

2496 

5.7 

4544 

Ackerman 

4.9 

1640 

4.9 

2368 

7.8 

4704 

Fibonacci 

15.1 

1614 

15.8 

2352 

26.4 

4688 

Sequ. Write 

4.9 

1932 

16.8 

2192 

16.9 

4224 

Min 

* 

860 

* 

1312 

* 

1744 

x 

46.0 

15946 

126.1 

28144 

128.8 

39184 





QuikByte Software, Inc., 23820 Hawthorne Blvd, Torrance, CA 90505 
Phone (213) 791 2095 Fax (213) 791 2094 
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This method is a good way to protect yourself from un¬ 
authorized changes to AUTOEXEC.BAT, but unfortunately does 
nothing about CONFIG.SYS. Any suggestions? 

Disabling the Print-Screen 
and Interrupt Keys 

JT Jewell 
POB #215 
Durham, NH 03824 

Trial and Error is a dangerous way to work with interrupts. 
I appreciate the clear examples in your articles and thought I 
would show my appreciation by offering my own. 

Pntscn, Control-C and Control-Break produce disasterous 
results when entered in an application that has not accounted 
for them. The simplest method of handling them is to take 
away their power by disabling them. 

Enclosed is an assembly “Disabler” routine (Listing 4), a 
sample C calling program (Listing 5) and my mailing address. I 
enjoy writing “Mystery Code” and welcome any questions 
from readers. 

Yes, it indeed does work. If I never accidentally hit 
Print-Screen (and have to wait for the cursor to trace over 
every line of my display) again, I certainly won’t shed any 
tears over the loss...now if only all developers would include 
JT's code in their systems! □ 




Create FAST & COMPACT 
applications in C 

Vlib is a comprehensive library of over 300 easy 
to use C functions for building sophisticated PC 
appbcations 

♦ Menus ♦ Forms ♦ Memo Editor ♦ 


♦ Mouse Support ♦ Pop-up Messages ♦ 
♦ Pick Lists ♦ Dialog Boxes ♦ 

♦ Windows ♦ Borders ♦ and more ♦ 


Vlib produces the smallest, fastest programs of 
any C library! 

For Microsoft C and Quick C, Borland Turbo C 
and C++. All memory models. 

Free Demo Disk Available 
Call (408) 984-2256 

Pathfinder Associates 
291 Madrone Ave., Santa Clara, CA 95051 
FAX (408) 244-5665 BBS (408) 246-0164 


vlib $ 149 

libraries, manual, 
and source code. 


Vman $ 49 

online manual for 
VLIB. 
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Programming The Hayes Enhanced Serial Interface 

Comments by Victor Volkman 


The Problem 

A little more than a decade ago, the 300 baud modem was 
the the fastest that you could hope to communicate with. 
Today, the fastest modems can operate at peak speeds of up 
to 57,600 baud, nearly 200 times faster than their predecessor. 
At these rates, characters may arrive as often as every 176 
microseconds (s). Maintaining high data transfer rates with 
conventional hardware requires meticulous programming and 
a dedicated CPU. However, in a modern multitasking environ¬ 
ment such as Windows 3.0 or DESQview 2.x, the resources of 
the CPU can easily be taxed beyond their limit to accom¬ 
modate high data rates. The end-user must either reduce the 
priority of all other active processes or reduce the data rate to 
conventional speeds. The former solution negates the benefits 
of multitasking, and the latter solution negates the benefits of 
the high-speed modem. The answer to this conundrum is to 
increase the data buffering capabilities of the serial interface 
hardware. 

The Universal Asynchronous Receiver/Transmitter (or UART) 
is the interface chip that buffers data between your modem 
and your CPU. The UART handles many of the low-level details 
of the serial communications. It monitors and controls line 


conditions, serializes outgoing data, de-serializes incoming 
data, and issues hardware interrupts as required. The original 
National Semiconductor INS8250 UART chip, used in most PCs 
built before 1987, provided only a one-byte receive buffer. The 
latest National Semiconductor UART, the NS16550AFN chip, 
provides a 16-byte First-In First-Out (FIFO) receive buffer. The 
Hayes Enhanced Serial Port adapter (see Figure 1) extends the 
transmit and receive buffers of conventional UARTs to 1,024 
bytes. 

The ESP Solution: Compatible And Enhanced 

The Hayes Enhanced Serial Port (ESP) adapter, introduced in 
late 1990, replaces and extends the traditional COM1/COM2 
serial port adapter. The ESP combines dual 16550 UARTs with 
an on-board communications co-processor (See Figure 2). The 
ESP has two distinct modes of operation to provide both old 
and new standards in the same package: Compatability Mode 
and Enhanced Mode. Each ESP port can be independently 
operated in either mode. Default modes are configured via DIP 
switches and can be modified by ESP commands. The MCA- 
bus version of the ESP uses Programmable Option Selection 
(POS) rather than DIP switches. 


Victor R. Volkman received a bachelor's degree in computer science from Michigan Technological University. He is a software 
engineer at Cimage Corporation, Ann Arbor, Michigan, and can be reached at the HAL 9000 BBS, 313-663-4173, 1200/2400/9600 baud 
or via Usenet as vrv0cimage.com. 
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In Compatibility Mode, the ESP emulates a standard 8250 
or 16450 UART. This mode is designed for older communica¬ 
tions software, which is unaware of the NS16550 FIFO receive 
buffer. Modern communications programs such as DSZ 
Zmodem, ProcommPlus v2.0, and PCBoard BBS vl4.2 automat¬ 
ically detect an NS16550 and enable the FIFO receive buffer. 
Programs such as these are often described as 16550-"aware". 

The ESP maximizes the performance of applications in Com¬ 
patibility Mode. First, the ESP can be set up to enforce FIFO 
receive buffering, so the UART looks like a 8250 or 16450 to 
your application, but secretly uses the 16-byte FIFO receive 


Figure 1 



Dual Enhanced Serial Port 


Figure 2 



Port 1 Port 2 


ESP Functional Block Diagram 


buffer to improve throughput If the application attempts to 
disable the FIFO receive buffer, then the ESP will turn around 
and re-enable it If the application attempts to enable the FIFO 
receive buffer, then the ESP will end its charade and allow the 
application to recognize the 16550 chip. 

Compatability Mode also offers automatic hardware flow 
control. With this option, applications that currently lack 
hardware flow control can be forced to obey it. The ESP can 
automatically take over flow control via the RS-232 Ready To 
Send (RTS) and Data Terminal Ready (DTR) lines. The RTS and 
DTR automatic flow controls can be independently enabled 
and disabled. 

In Enhanced Mode, the ESP uses the onboard co-processor 
to provide IK FIFO receive and transmit buffers, advanced flow 
control, and Direct Memory Access (DMA) data transfer. An ap¬ 
plication must have a special driver to take advantage of any 
Enhanced Mode features. The Flayes Enhanced Serial Interface 
(ESI) specification defines the set of commands that must be 
used by Enhanced Mode drivers. Hayes only provides an En¬ 
hanced Mode driver for OS/2 and Windows 3.0 applications. So 
for now, if your application is targeted for plain MS-DOS or an 
unsupported multitasking system, you will need to write your 
own driver to use Enhanced Mode. 

What ESP Includes 

The ESP, which lists at $299 in the United States, includes 
the adapter card, technical reference booklet, installation 
guide, and installation diskettes. The ESP comes with both 5- 
1/4-inch and 3-1/2-inch installation diskettes. One of the files 
is ESP.EXE, a utility to detect existing serial port configurations 
and guide you through setting the two banks of DIP switches. 
It is designed to be run before installing the ESP adapter card. 
If you run the setup utility after installing the card, it will sug¬ 
gest that you use COM3/COM4 for the ESP rather than 
COM1/COM2. 

The ESP is a true full-length adapter card and hence will 
only fit in a large desktop or tower chassis. The adapter card 
was at least three inches longer than any other board in my 
chassis. The last three inches of the circuit board are devoid of 
circuitry. By shortening the circuit board to half-size, Hayes 
could embrace a much larger part of the portable and laptop 
markets. 

The Enhanced Serial Interface specification is not included 
when you purchase the ESP adapter, but you can order it for 
free from Hayes Developer Support Group or through the 
Hayes BBS. 

Inside The ESP 

The ESP's onboard co-processor is an eight-bit Intel 8031 
single-chip microprocessor. This microprocessor is similar to 
the Intel 8042 microprocessor, which controls your PCs key¬ 
board. The Intel 8031 on the ESP adapter is equipped with 8K 
RAM and 8K ROM. The on-board RAM and ROM are directly 
addressable only by the 8031 microprocessor itself. However, 
it is possible to download code and data to the 8031's private 
RAM via an ESI command. The usefulness of this is hampered 
by the absence of any memory map information about the 
8031 in the ESI specification. 
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Figure 3 


Register (Mnem.) 

Read/ 

Write 

Offset 

Address 

Register Ready 

R 

0 

Service ID 

R 

1 

Received Data Port 1 (RX1) 

R 

2 

Transmit Data Port 1 (TX1) 

W 

2 

Received Data Port 2 (RX2) 

R 

3 

Transmit Data Port 2 (TX2) 

W 

3 

Status 1 

R 

4 

Command 1 

W 

4 

Status 2 

R 

5 

Command 2 

W 

5 

DMA Received Data (DMA RX) 

R 

6 

DMA Transmit Data (DMA TX) 

W 

6 


Hayes ESI Register Set 


Program FASTER with... 

CC-RIDER 

or the new 



C++ RIDER 


POP-UP SOURCE BROWSERS FOR ANY EDITOR! 
CROSS-REF Editing! Source Analysis! QuickHelp, too! 


Instantly pop-up your 
symbol definitions with a 
hypertext hot-key inside 
any editor! The Standard 
Edition has Source View, 
Edit and Paste commands. 
And the powerful 
Professional Edition even 
lets you walk through all 
uses of a symbol in your 
code as you edit I 
C++ RIDER fully supports 
C++ v2.f, including 
classes, constructors, 
overloading, etc. 


Build a database of symbol 
information with our 
powerful source code 
analyzer which provides a 
wealth of useful output, 
like fully commented static 
and global function 
prototype #indude files 
and a detailed log file 
showing WHEREAND 
HOW all your symbols are 
used. And it now uses 
expanded memory for 
lightning last source code 
scanning! 


CCSVM can also create a 
help databaseloryour 
program which is 
compatible with Microsoft's 
help system, QuickHelp. 

All symbols in your 
application are accessible 
from QuickHelp’s menus, 
with documentation 
extracted automatically 
from your original 
source code. 

Works with ANSI/Microsoft 
C, plus AT&T/Zortech/ 
Borland C++. 
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ESP Adapter and ESI Specification 

Hayes Microcomputer Products, Inc. 

705 Westech Drive 
Norcross, GA 30092 

Phone: (404) 449-8791 in the U.S. 

01-848-1868 in the U.K. 

BBS: (800) 874-2937 in the U.S. 

01-569-1774 in the U.K. 


NS16550AFN UART Chips 

JDR Microdevices 
2233 Branham Lane 
San Jose, CA 95124 

Phone: (800) 538-5000 
BBS: (408) 559-0523 


The $25 Network 


Try the 1st truly low cost LAN 

* Connect 2 or 3 PCs, XTs, ATs, PS/2s 

* Uses serial ports and 5 wire cable 

* Runs at 115K baud, up to 90 feet 

* Transfer 8500 bytes per second (ATs) 

* Runs in background, totally transparent 

* Share any device, any file, any time 

* Needs only 15K of ram 

* Just $25 per network, NOT PER NODE! 

* Replace all file transfer software 

* Version 2.3M now has TinyMAIL 

* OVER 20,000 SOLD WORLDWIDE 


Skeptical? We make believers! 


Information Modes 

P.O. Drawer F 
Denton, TX 76202 
817-387-3339 Techline 

1-800-628-7992 Orders 
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Figure 4 


Figure 5 


Is Register Ready? 

Register 

Bit 

Received Data Port 1 (RX1) 

0 

Transmit Data Port 1 (TX1) 

1 

Received Data Port 2 (RX2) 

2 

Transmit Data Port 2 (TX2) 

3 

Status 1 

4 

Command 1 

5 

Status 2 

6 

Command 2 

7 


Service Condition 

Register 

Bit 

Port 1 RX FIFO level reached 

0 

Port 1 TX FIFO level reached 

1 

Port 1 Error Status 

2 

DMA Terminal Count 
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Port 2 RX FIFO level reached 
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Port 2 TX FIFO level reached 

1 

Port 2 Error Status 

2 

DMA Timeout 

3 


Register-Ready Register Bits 



\ 

Vim 

do 

ws 3.0 


Call For Papers 


We are currently seeking articles related to Windows 3.0 development. Potential topics include, but are not 
limited to: 


• Communicating with DOS applications 

• Using the sound generation functions 

• Working with initialization files 

• Doing your own multi-threading 

• C++ classes for Windows 

• Using the clipboard 

• Using the communications functions 


• Internationalization issues for Windows 
programs 

• Debugging Windows C++ programs 

• Managing color in your Windows application 

• Porting a DOS user interface to Windows 

• C/C++development utilities 

• C++ memory management under Windows 


If you are interested in writing about one of these topics or you have a related idea, please contact our 
editorial staff for author guidelines at (913) 841-1631. 


TECH. .. . 
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The 8K RAM onboard the ESP mostly manages transmit and 
receive FIFO queues. The transmit queue holds outbound char¬ 
acters waiting to be sent to the modem, and the receive 
queue holds inbound characters waiting to be read by the 
host. The sizes of the transmit and receive queues are fixed at 
1,024 characters. Because there is a separate transmit buffer 
and receive buffer for both COM ports, the total RAM con¬ 
sumed by all of the FIFO queues is 2 * 2 * IK = 4K. This 
leaves 4K remaining for the 8031 to use as stack and program 
variables. 

Although all of the ESPs manufactured to date contain two 
serial ports, the ESI specification allows for the existence of a 
single-port ESP board. You can detect the presence of such an 
adapter by examining the high four bits returned by ESP_Get- 
SelfTestResults() (see Listing 1). The exact adapter RAM and 
ROM configuration for this hypothetical configuration are not 
known. 

The Hayes ESP is similar in many ways to other intelligent 
serial port adapters that have preceded it. Most intelligent 
serial port adapters, such as the Arnet SmartPort series, in¬ 
clude a 16-bit onboard microprocessor such as an Intel 8086 
or 80186. These other boards may contain 4, 8, 16 or even 32 
serial ports each. These adapters often include about 4K of RAM 
and EPROM per serial port Intelligent serial ports normally allow 
Direct Memory Access (DMA) transfers of several hundred bytes 
or more simultaneously. The SmartPort boards, unlike the Hayes 
ESP, provide dual-ported RAM simultaneously accessible by the 
host PC and adapter. On the SmartPort, Dual-ported RAM is ac¬ 
cessed through a window in high memory (above 640K). Last, 
most intelligent serial port adapters, such as the Arnet SmartPort 
and Digicomm DigiCHANNEL, run 
downloaded user-programs. The Hayes 
ESI specification openly discourages 
downloading user-programs to the ESP 
adapter because doing so might inter¬ 
fere with the extended UART metaphor 
on which ESI is based. 


The ESI Register Set 

The Enhanced Serial Interface 
specifies a register set that application 
programs must use to submit com¬ 
mands, obtain status, send characters, 
and receive characters. The 12 ESI 
registers are: Register Ready, Service ID, 
Received Data Port 1, Transmit Data 
Port 1, Received Data Port 2, Transmit 
Data Port 2, Status 1, Command 1, 
Status 2, Command 2, DMA Received 
Data, and DMA Transmit Data. These 12 
registers are mapped into seven distinct 
I/O addresses. This mapping is possible 
because each eight-bit register is acces¬ 
sible as read-only or write-only (see Fig¬ 
ure 3). Because it is impossible for 
software to determine the base address 
of the ESP registers, you must provide a 
method for the user to tell your ap¬ 
plication what the base address is. I 
used an environment variable called 


HAYESESP, as is done for the OS/2 driver. A brief overview of 
the ESI register set will help explain how the ESI commands work. 

The Register Ready register is the most frequently ac¬ 
cessed register when issuing ESI commands. This register indi¬ 
cates which registers have data waiting for the host. Each bit 
position in the Register Ready register is dedicated to the 
status of one ESI register (see Figure 4). A value of one in any 
bit indicates the ESP has data in the register waiting for the 
host A value of zero indicates the the ESP has not put data in 
the register because the host last read it 

The only way to clear a bit in the Register Ready register is 
to read the corresponding register. Because every ESI com¬ 
mand causes information to be written to one or more status 
registers, the status registers must be read immediately fol¬ 
lowing a command. Otherwise, issuing a subsequent com¬ 
mand that did require the status information would inadver¬ 
tantly fool the application into reading stale status bytes. 

The Service ID register tells which conditions are the source 
for the current interrupt request. These conditions may in¬ 
clude receive or transmit FIFO level indications, line errors, and 
DMA transfer block termination. The Service ID bits include 
conditions for both ports 1 and 2 (see Figure 5). This register is 
normally accessed only in the context of an Interrupt Service 
Routine (ISR). 

The Received Data and Transmit Data registers share the 
same I/O address space for each port. When latched for read, 
the I/O port becomes the Received Data register. When latched 
for write, the I/O port becomes the Transmit Data register. This 
means that these registers operate identically to their counter¬ 
parts on the 8250 family UARTs. The corresponding bits in the 


Figure 6 


Setup Commands 

Operating Commands 

ESP Reset() 

ESP_GetSelfTestResults() 

ESP GetNormalModeAddrSwitch() 
ESP DownloadESPCode() 
ESP_SetEnhancedIntAndDMA() 

ESP SetDMAtimeout() 
ESP_SetServiceRequestMask() 
ESP_SetErrorStatusMask() 
ESP_SetFlowControlType() 

ESP SetFlowControlChars() 
ESP_SetRXFlowControlLevels() 
ESP_SetFIFOTriggerLevels() 

ESP SetReceiveCharTimeout() 

ESP SetFlowedOffTimeout() 

ESP WriteToUART() 

ESP ReadFromUART() 

ESP SetBaudRatef) 

ESP GetMode() 

ESP GetErrorStatus() 
ESP_GetUARTStatus() 

ESP InitiateDMAReceive() 
ESP_InitiateDMATransmit() 
ESP_FlowOffLocalTransmitter() 
ESP_FlowOnLocalTransmitter() 

ESP IssueLineBreak() 

ESP FlushRxFIFO() 

ESP FlushTxFIFO() 


Overview of an ESI Library for C 
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STOP 

- A 


...ERRORS! 


End your listing errors by subscribing to 
TECH Specialist’s code listings on disk. 



...HIGHER 

PRODUCTIVITY! 


Save hours of typing in long code listings 
and make better use of your time. 



Call 913-841-1631 TODAY! 

For only $30* you’ll receive 12 disks 
(one per issue) of TECH Specialist 
listings. You’ll save 50% off the price 
of buying the disks individually! 

If you don’t already subscribe 
to TECH Specialist --order both the 
magazine and disk for $59.* 


Subscriptions must be prepaid and 
are available on 5.25" or 3.5" 
MS-DOS format only. 


TECH. .. _ 
specialist 


2601 Iowa 

Lawrence, KS 66046 USA 


'foreign prices vary (call for details) 


Register Ready register should be examined before accessing 
the Received Data and Transmit Data registers. 

The Status and Command registers work together to issue 
and receive data from ESI commands. Unlike the Received 
Data and Transmit Data registers, the Status and Command 
registers are not dedicated to a specific port. Because they are 
a common resource, they will require special sharing during 
multitasking. The Command 1 register specifies the opcode for 
ESI commands. The Command 2 register provides the 
operands for the ESI commands. The Status 1 and Status 2 
registers provide return codes for the ESI commands. 

The DMA Transmit and Receive registers must be linked to 
the Intel 8237 DMA Controller during DMA transfers. Transfer¬ 
ring data via DMA does not necessarily guarantee better per¬ 
formance than conventional I/O techniques. According to Sar¬ 
gent and Shoemaker (1986), the 80286 CPU can outperform 
the 8237 DMA controller on RAM-to-l/O and l/O-to-RAM trans¬ 
fers. For example, the AT BIOS actually uses the 80286 string 
I/O instructions (REP INSW, REP OUTSW) instead of DMA to talk 
to the hard disk controller. See the bibliography for more in¬ 
formation on DMA techniques. 

An ESI Interface Library 

The major part of the Hayes ESI specification describes the 
commands and their parameters. The ESI specification includes 
more than 30 individual functions that initialize session 
parameters, monitor buffer activity, and control transmission. 


Figure 7 


ESP Information report 

Firmware revision 3.00. 

RAM test OK. 

ROM test OK. 

ROM size is 8K. 

AT ISA-compatible bus. 

Dual-port ESP interface. 

DIP switch settings indicate 

Port 1: UART address is 3F8H, IRQ level 4 

Port 2: UART address is 2F8H, IRQ level 3 

Port 1 Current Mode Attributes: 

Compatibility Mode enabled. 

Compatibility Mode UART FIFO disabled. 
Compatibility Mode RTS flow control disabled. 
Compatibility Mode DTR flow control disabled. 
Enhanced Mode RX is Programmed I/O Mode. 
Enhanced Mode TX is Programmed I/O Mode. 

Port 2 Current Mode Attributes: 

Compatibility Mode enabled. 

Compatibility Mode UART FIFO disabled. 
Compatibility Mode RTS flow control disabled. 
Compatibility Mode DTR flow control disabled. 
Enhanced Mode RX is Programmed I/O Mode. 
Enhanced Mode TX is Programmed I/O Mode. 

Port 1 Bytes waiting to be read from RX Buffer: 0 

Port 1 Bytes available to be written in TX Buffer: 1023 

Port 2 Bytes waiting to be read from RX Buffer: 0 

Port 2 Bytes available to be written in TX Buffer: 1023 


Sample Output from ESPINFO.C 
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For the sake of brevity, my discussion 
will omit coverage of the flow control 
and DMA transfer functions. Readers in¬ 
terested in these functions should re¬ 
search the ESI specification from Hayes. 

The method in which ESI commands 
are issued is similar to how the tradi¬ 
tional Hayes AT modem commands are 
issued. That is, command bytes are 
written to an I/O port address and 
results are read back, while the AT 
command set controls the modem, the 
ESI command set controls the ESP ports. 

The ESI specification falls short of 
defining a software interface for com¬ 
mands, such as a calling mechanism 
through ROM BIOS or DOS software in¬ 
terrupt extensions. You must provide 
your own function calls for issuing ESI 
commands. The interface that I have 
developed for this discussion is shown 
in ESP.C and ESP.H (see Listings 1 and 
2). I will refer to the function names in 
Listing 1 as if they were the actual ESI 
command bytes mnemonics. 

The ESI functions are divided into 
two major function groups: setup com¬ 
mands and operating commands (see 
Figure 6). The setup commands provide 
all the necessary initialization you need 
before starting a communications ses¬ 
sion. This includes resetting the ESP, set¬ 
ting interrupt and error condition 
masks, setting FIFO parameters, and in¬ 
itializing the 16550 UARTs. The operat¬ 
ing commands enable you to monitor 
and control a communications session 
in progress. Operating commands exist¬ 
ing for checking communications ses¬ 
sion status, toggle flow control, initiate 
DMA transfers, and manage the FIFOs. 

Setup Commands 

The ESP_Reset() function is the 
only way of bringing the ESP back to a 
known state of operation. The ESI 
specification recommends a reset as the 
first part of an initialization sequence. 
ESP_Reset() causes all the ESP registers 
to be return to their power-on defaults 
and toggles a hardware reset on the 
16550 UARTs. Because the FIFO buffer 
pointers are zeroed, all pending FIFO 
data is lost. ESP_Reset() should never 
be called directly by applications in a 
multitasking environment without a su¬ 
pervising device driver (such as 
ESP0S2.SYS in OS/2). If another application 
already had a communications session in 


Listing 1 (espc.) 


#include <conio.h> 

#inc1ude <stdio.h> 
linclude <std1ib.h> 

#inc1ude "esp.h" 
linclude “esp.fu" 

Idefine OK 1 

Ideflne FAIL 0 

Idefine bool short 

Idefine high(a) ((a) » 8) 
Idefine low(a) ((a) & OxFF) 

ESP_Reg e$p_reg_info[] * ( 
(ESP_REG_READY_OFFS, 
(ESP_REG_SID_OFFS, 

(ESP_REG_RX1_0FFS, 
(ESP_REG TX1_0FFS, 

(ESP_REG RX2 OFFS, 

(esp_reg“tx2“offs, 

(ESP_REG_STATUS1 OFFS, 

(ESP_REG_CMD1_0FFS, 

(ESP_REG_STATUS2_0FFS, 

(ESP_REG_CMD2_0FFS, 

(ESP_DMA RX OFFS, 
(ESP~DMA~TX“OFFS, 

}; 


/* Indexed by ESP_REG_... */ 
0 . )." 

0 . ), 

ESP REG_RX1_RDY ), 

ESP~REG_TX1_RDY ), 

ESP REG_RX2_RDY ), 

ESP“REG“TX2_RDY ), 

ESP_REG_ST ATUS1_RDY), 
ESP_REG_CMD1_RDY ), 

ESP_REG_STATUS2_RDY), 

ESP_REG CMD2_RDY ), 

0 . " 1 . 

0 , ), 


short esp uart_addr[] * /* bits 1-3 on DIP SW1 & SW2 */ 
(0x3F8,~0x2F8, 0x3E8, 0x2E8, OxlEO, 0xlE8, 0x280, 0x288); 
short esp_irq[] * /* bits 1-3 on DIP SW1 A SW2 */ 

{ 3, 4, 3. 9, 5, 9, 5); 


short ESP_InitHand1e(esp_h,esp_no,port) 

ESP_Handle *esp_h; 
short esp_no; 
short port; 

{ 

char *esp_env; 

short dips; 

if ((esp_env«getenv("HAYESESP")) «= NULL) ( 

printf("Error: please set HAYESESP ■ addr,dma,irq\n"); 
return FAIL; 

) 

if (sscanf(esp_env,"%x,%d,%d", &esp_h->base_addr, 

&esp_h->dma, &esp_h->irq) != 3) { 

printf("Error: please set HAYESESP * addr,dma,irq\n"); 
return FAIL; 

) 

esp_h->esp_no « esp_no; /* always 1 or 2 */ 

esp_h->port = port; /* always 1 or 2 (not COMx value!) */ 

if (!(dips=ESP_GetNormalModeAddrSwitch(esp_h))) ( 

printf("Error: MCA-bus version of ESP not yet supported!\n“); 
return FAIL; 

) 

if (port==2) 
dips »■ 4; 

esp_h->uart_addr - esp_uart_addr[dips & 0x07]; 

return OK; 


/**♦*»* SETUP COMMANDS ******/ 

short ESP_Reset(esp_h) /* Reset an ESP (both ports) */ 
ESP_Handle *esp_h; 

( 
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Listing 1 — Cont’d 


/* Flush out Status 1, if any data is left over */ 
if (inp(esp_h->base_addr + ESP_REG_READY OFFS) 

& ESP_REG_STATUS1_RDY) 

ESP_WaitRead(esp_h, ESP_REG_STATUS1); 

ESP_WriteCmdl(esp_h, ESP_CMD_RESET); 
return ESP_WaitRead(esp_h, ESP_REG_STATUS1); 


void ESP_GetSelfTestResults(esp_h, firmware_rev, test_results) 
ESP_Handle *esp_h; 
short *firmware_rev; 
short *test_results; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_GET_SELF_TEST_RES); 
*firmware_rev = ESP_WaitRead(esp_h, ESP REG_STATUS1); 
*test_results = ESP_WaitRead(esp_h, ESP~REG~STATUS2); 

) 


short ESP_GetNormalModeAddrSwitch(esp_h) 
ESP_Handle *esp_h; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_GET_COMPAT_DIPS); 
return ESP_WaitRead(esp_h, ESP_REG_STATUS1); 


void ESP_DownloadESPCode(esp_h, buffer, address, num_bytes) 

ESP_Handle *esp_h; 

char ‘buffer; 

short address; 

short num_bytes; 

{ 

short byte_no; 

ESP_WriteCmdl(esp_h, ESP_CMO_DOWNLOAD_CODE); 

ESP_WriteCmd2WaitWord(esp_h, high(address), low(address)); 

ESP_WriteCmd2Wait(esp_h, num_bytes - 1); 

for (byte_no=0; byte_no < num_bytes; byte_no++) 

ESP_WriteCmd2Wait(esp_h, buffer[byte_no]); 


void ESP_SetEnhancedIntAndDMA(esp_h, int_dma_data) 
ESP_Handle *esp_h; 
short int_dma_data; 

( 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_1NTR_AND_DHA); 
ESP_WriteReg(esp_h, ESP_REG_CMD2, int_dma_data); 

) 

void ESP_SetDMAtimeout(esp_h, timeoutjns) 

ESP_Handle *esp_h; 
short timeout_ms; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_DMA_TIMEOUT); 
ESP_WriteReg(esp_h, ESP_REG_CMD2, timeout_ms / 10); 


void ESP_SetServiceRequestMask(esp_h, serv_rq_mask) 

ESP_Handle *esp_h; 
short serv_rq_mask; 

I 

ESP_WriteReg(esp_h, ESP_REG_CM01, ESP_CMD_SET_SERVICE_MASK); 
ESP_WriteReg(esp_h, ESP_REG_CMD2, serv_rq_mask); 

} 

void ESP_SetErrorStatusHask(esp_h, status_maskl, status_mask2) 
ESP_Handle *esp_h; 
short status_maskl; 
short status_mask2; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_ERROR_MASK); 
ESP_WriteCmd2WaitWord(esp h, status maskl, status mask2); 

} 


progress, it would be abnormally ter¬ 
minated by ESP_Reset(). 

The ESP_GetSelfTest() command 
helps you determine if the ESP adapter 
is installed and operating correctly. The 
ESPJGetSelf Test () function returns a 
one-byte ROM revision code and a one- 
byte encoded description of the ESP 
adapter installed. A typical configuration 
is shown in the first section of the 
report in Figure 7. Bitmask flags for 
these values are listed as the constants 
“ ESP_TEST_..." in Listing 2. 

The ESP_GetNormalModeAddrSwitch() 
command is only supported on the AT- 
bus version of the ESP. This function 
returns the DIP switch values encoded 
with the base addresses and IRQs of 
the UARTs onboard the ESP. ESP_Init- 
Handle() decodes the DIP switch values 
by indexing into the esp_uart_addr[] 
and esp_irq[] arrays. 

The Micro Channel Architecture 
(MCA) bus version of the ESP is referred 
to as the ESP-PS/2 in the ESI specifica¬ 
tion. The ESP-PS/2 adapter reports all of 
its information via the MCA Program¬ 
mable Option Select (POS) feature. The 
POS allows IBM PS/2s to store hardware 
configuration information in the host's 
extended CMOS RAM. The list of POS ad¬ 
dresses and data can be found in the 
preface of the ESI specification. 

ESP_SetEnhancedIntAndDMA() sets 
up the IRQ and DMA channels used in 
Enhanced Mode. If desired, the En¬ 
hanced Mode IRQ number can be dif¬ 
ferent than the Compatability Mode IRQ 
number. The DMA channel number can 
only be channel 1 or channel 3 on the 
AT-bus version of the ESP. Again, the 
ESP-PS/2 uses the POS data to configure 
both IRQ and DMA activity. Thus, the 
ESP-PS/2 ignores this command for the 
most part. Only bit zero, which serves 
as the master Enhanced Mode interrupt 
enable, is recognized on both the ESP- 
AT and ESP-PS/2 adapters. 

ESP_SetServiceRequestMask() tells 
the ESP which events are allowed to 
signal an IRQ hardware interrrupt. The 
possible events are: receive FIFO level 
reached, transmit FIFO level reached, 
line error, and DMA completion. The 
FIFO events are enabled separately for 
each port. Bitmask flags for all these 
values are listed as the constants 
‘‘ESP_SERV_...’ in Listing 2. Extreme care 
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Listing 1 —Cont’d 


void ESP_SetFlowControlType(esp_h, flow_typel, flow_type2) 
ESP_Handle *esp_h; 
short flow_typel; 
short flow_type2; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_FLOW_CTRL_TYPE); 
ESP_WriteCmd2WaitWord(esp_h, flow_typel, flow_type2); 

} 

void ESP_SetFlowControlChars(esp_h, control_chars) 

ESP_Handle *esp_h; 
char *control_chars; 

{ 

int i; 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_FLOW_CTRL_CHAR); 
for (i=0; i<5; i++) 

ESP_WriteCmd2Wait(esp_h, control_chars[i]); 

) 

void E$P_SetRXFlowControlLevels(esp_h, recv_off, recv_on) 
ESP_Handle *esp_h; 
short recv_off; 
short recv_on; 

( 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_RX_FIFO_LEVEL); 
ESP_WriteCmd2WaitWord(esp_h, high(recv_off), low(recv_off)); 
ESP_WriteCmd2WaitWord(esp_h, high(recv_on), low(recv_on)); 

) 

void ESP_SetFIFOTriggerLevels(esp_h, rx_level, tx_level) 
ESP_Handle *esp_h; 
short rx_level; 
short tx_level; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_FIFO_TRIGGER); 
ESP_WriteCmd2WaitWord(esp_h, high(rx_level), low(rx_level)); 
ESP_WriteCmd2WaitWord(esp_h, high(tx_level), low(tx_level)); 

1 

void ESP_SetReceiveCharTimeout(esp_h, timeout_ms) 

ESP_Handle *esp_h; 
short timeout_ms; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_RCV_CHAR_TMO); 
ESP_WriteReg(esp_h, ESP_REG_CMD2, timeoutjns); 

} 

void ESP_SetFlowedOffTimeout(esp_h, timeout_sec) 

ESP_Handle *esp_h; 
short timeout_sec; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_SET_RCV_CHAR_TMO); 
ESP_WriteReg(esp_h, ESP_REG_CMD2, timeout_sec); 

) 

void ESP_WriteTollART(esp_h, uart_reg, uart_data) 

ESP_HandTe *esp_h; 
short uart_reg; 
short uart_data; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_WRITE_TO_UART); 
ESP_WriteCmd2WaitWord(esp_h, uart_reg, uart_data); 

) 

short ESP_ReadFromUART(esp_h, uart_reg) 

ESP_Handle *esp_h; 
short uart_reg; 

{ 

ESP_WriteCmdl(esp_h, ESP_CMD_READ_FROM_UART); 
ESP_WriteReg(esp_h, ESP_REG_CMD2, uart_reg); 
return ESP_WaitRead(esp_h, ESP_REG_STATUS1); 

} 
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Listing 1 — Cont’d 



void ESP SetBaudRate(esp h, baud rate) 

ESPJiandle *esp_h; 
long baud rate; 


The $40 Solution 

{ 

short divisor; 


The NS16550AFN UART chip, 
which forms the heart of the 

divisor = (short) (ESP MAX COMP BAUD / baud rate); 


ESP's serial capability, can actual- 

ESP_WriteCmdl(esp_h, ESP_CMD SET BAUD RATE); 


ly be used to retrofit the serial 

ESP WriteCmd2WaitWord(esp h, high(divisor), low(divisor)); 

) 


ports that you already own. In 
many cases, this chip may pro- 

void ESP GetMode(esp h, def mode, cur mode) 

ESP Handle *esp h; 
short *def mode; 


vide all the buffering capacity 
you need. The performance in- 

short *cur mode; 

{ 

ESP WriteCmdl(esp h, ESP CMD GET MODE); 

*def mode = ESP WaitRead(esp h, ESP REG STATUS1); 


crease under multitasking sys¬ 
tems such as DESQview can be 
quite dramatic. Increasingly, high 

*cur mode =• ESP WaitRead(esp h, ESP REG STATUS2); 

) 


performance communications 
software packages strongly 

void ESP SetMode(esp h, new mode) 


recommend this chip. If you are 

ESPJiandle ‘espji; 


using OS/2 vl.2 or later, you can 

short new mode; 

{ 


immediately take advantage of 

ESP WriteCmdl(esp h, ESP CMD SET MODE); 


this chip. 

ESP WriteReg(esp h, ESP REG CMD2, new mode); 

) 


Since this chip is pin-for-pin 
compatible with the entire 8250 

/“““ OPERATING COMMANDS “““/ 


family, you can upgrade by un- 

void ESP GetErrorStatus(esp h, errorl, error2) 

ESP Handle *esp h; 


plugging your old 8250 or 16450 
chip and plugging in the 16550. 

short ‘errorl; 


The chips are available from 

short *error2; 


mail-order electronics com- 

l 

ESP WriteCmdl(esp h, ESP CMD GET MODE); 


ponent dealers, such as JDR 

‘errorl = ESP WaitRead(esp h, ESP REG STATUS1); 


Microdevices of San Jose, CA. The 

*error2 = ESP WaitRead(esp h, ESP REG STATUS2); 

} 


NS16550AFN chip or the 
WD16C550, its Western Digital 

void ESP_GetUARTStatus(esp h, line status, modem status) 


counterpart, are priced at about 

ESPJiandle *esp_h; 
short ‘line status; 


$15 to $25. 

short ‘modem status; 

{ 


Check to see if your existing 
UARTs are socketed before or- 

ESP WriteCmdl(esp h, ESP CMD GET UART STATUS); 

‘line status = ESP WaitRead(esp h, ESP REG STATUS1); 


dering a new chip. Most single- 

‘modem status = ESP WaitRead(esp h, ESP REG STATUS2); 

) 


port serial cards, except for the 
original IBM adapter, have the 

short ESP GetRXBytesAvail(esp h) 


UART soldered directly to the 

ESP Handle *esp h; 

{ 

ESP WriteCmdl(esp h, ESP CMD GET RX BYTES AVAIL); 


board. Most dual-port serial 
cards contain one soldered UART 

return (ESP WaitRead(esp h, ESP REG STATUS1) « 8) + 


and one socketed UART. Nearly 

(ESP WaitRead(esp h, ESP REG STATUS2)); 

) 


all multi-port (four or more port) 
serial cards are fully socketed, o 

short ESP GetTXSpaceAvai1(esp h) 

ESP Handle *esp h; 

1 



1 

ESP WriteCmdl(esp h, ESP CMD GET TX BYTES AVAIL); 
return (ESP WaitRead(esp h, ESP REG STATUS1) « 8) + 



(ESP WaitRead(esp h, ESP REG STATUS2)); 

) 



void ESP InitiateDMAReceive(esp h) 

ESPJiandle *esp_h; 



l 

ESP WriteCmdl(esp h, ESP CMD INIT DMA RECEIVE); 

) 
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must be used when calling ESP_Set- 
ServiceRequestMask() from an applica¬ 
tion in a multitasking environment. I 
will elaborate on this point in detail 
later. 

ESP_SetErrorStatusMask() works 
with the function above to further 
refine which events cause a line error 
interrupt. One or more of the following 
events can trigger a line error interrupt: 
receive character timeout, receive FIFO 
overflow, parity error, framing error, line 
break, transmitter buffer empty, and 
flow control changes. Bitmask flags for 
all these values are listed as the con¬ 
stants “ESP_ERR_..." in Listing 2. When 
multiple line error triggers are enabled, 
ESP_GetErrorStatus() can determine 
the exact cause of the line error. 

The ESP_SetFIFOTriggerLevels() 
command also works with the 
ESP_SetServiceRequestMask() func¬ 
tion. In this case, the triggering event is 
the presence or absence of characters 
in the FIFO buffers. Moving characters 
through a FIFO is similar to pouring 
water through a funnel. If you pour 
water through a funnel faster than it 
can drain, then the water slowly rises 
and may eventually overflow. Flayes 
suggests setting the high water mark 
for the receive buffer at 256 characters. 
At 38,400 baud, this would give you a 
reasonable 200ms warning to empty 
out the receive buffer (as calculated 
below): 


1 second * 
3840 bytes 


(1023 - 256 bytes) = 200 ms 


Similarly, Flayes recommends a high 
water mark of 768 characters for the 
transmit buffer. This would give you 
about 66ms warning that the transmit 
buffer was about to overflow. If you 
continue to use a buffer after an inter¬ 
rupt has been triggered, then you 
should call ESP_GetRxBytesAvail() or 
ESPJGetTxBytesAvail () as appropriate. 

ESP_SetReceiveCharTimeout() allows 
you to set an expiration period on charac¬ 
ters in the receive buffer. If the receive 
FIFO is not empty and the expiration 
period elapses before another character 
arrives, then the ESP will trigger an in¬ 
terrupt and set a flag in the Service Re¬ 
quest Mask. Without this timeout, the 


Listing 1 — Cont’d 


void ESP_InitiateDMATransmtt(esp_h) 

ESP_Hand1e *esp_h; 

{ 

ESP WriteCmdl(esp_h, ESP_CMD_INIT_DMA_TRANSMIT); 

) 


void ESP_F1owOffLocalTransmitter(esp_h) 

ESP_Handle *esp_h; 

f 

ESP_WriteCmdl(esp h,ESP_CMD_FLOW_OFF_LOC_XMIT); 

) 

void ESP_F1owOnLocalTransmitter(esp_h) 

ESP_Handle *esp_h; 

{ 

ESP_WriteCmdl(esp_h,ESP_CMD_FLOW_ON_LOC_XMIT); 

} 

void ESP_IssueLineBreak(esp_h, break_ms) 

ESP_Handle *esp_h; 
short breakjns; 

( 

ESP_WriteCmdl(esp_h, ESP_CMD_ISSUE_LINE_BREAK); 
ESP_WriteReg(esp_h, ESP_REG_CMD2, breakjns / 10); 

) 

void ESP_F1 ushRxFIF0(esp_h) 

ESP Handle *esp_h; 

{ 

ESP_WriteCmdl(esp_h, esp_h->port + ESP_CMD_FLUSH_RX_FIFO); 

1 
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Listing 1 — Cont'd 


void ESP_FlushTxFIFO(esp_h) 

ESP_Handle *esp_h; 

f 

ESP_WriteCmdl(esp_h, esp_h->port + ESP_CMD_FLUSH_TX_FIFO); 

} 

/****** LOW-LEVEL ESP ACCESS ROUTINES ******/ 

short ESP_WaitRead(esp_h, esp_reg) 

ESP_Handle *esp_h; 
short esp_reg; 

( 

short esp_reg_m«sk; 

esp_reg_mask ■ esp_reg_info[esp_reg].ready_flag; 

/* loop until register ready bit is true */ 
while (!(inp(esp_h->base_addr + ESP_REG_READY_OFFS) 

A esp_reg_mask)): 

return inp(esp_h->base_addr + esp_reg_info[esp_reg].reg_offset); 

} 


void ESP_WriteReg(esp_h, esp_reg, cmddata) 

ESP_Handle *esp_h; 
short esp_reg; 
short cmddata; 

{ 

outp(esp_h->base_addr + esp_reg_info[esp_reg].reg_offset, 
cmd data); 

) 

void ESP_WriteCmdl(esp_h, cmdl_data) 

ESPHandle *esp_h; 
short cmdl_data; 

{ 

/* Op-code is modified by port number in some caes... */ 
if ((cmdl_data >= ESP_CMD_SET_ERROR_MASK) && 

(cmdl_data !* ESP_CMO_CLEAR_DMA_SERV_RQ)) 
cmdl_data |= ESP_P0RT2 * (esp_h->port »» 2); 

outp(esp_h->base_addr + ESP_REG_CHD1_0FFS, cmdl_data); 

) 

short ESP_WriteCmd2Wait(esp_h, cmd2_data) 

ESP_Handle *esp_h; 
short cmd2_data; 

{ 

outp(esp_h->base_addr + ESP_REG_CMD2_OFFS, cmd2_data); 

/* loop until register ready bit is true */ 
while (!(inp(esp_h->base_addr + ESP_REG_READY_OFFS) 

& ESP_REG_CMD2_RDY)); 

return inp(esp_h->base addr + ESP_REG_CMD2_0FFS); 

} 


void ESP_WriteCmd2WaitWord(esp_h, datal, data2) 
ESP_Handle *esp_h; 
short datal; 
short data2; 

( 

ESP_WriteCmd2Wait(esp_h, datal); 
ESP_WriteCmd2Wait(esp_h, data2); 

) 

/* End of File */ 


user at the other end of the com¬ 
munication session must fill the entire 
FIFO buffer to get any response back 
from your host application. This function 
must also be enabled with ESP_Set- 
ServiceRequestMask() to actually 
generate an interrupt. 

The ESP_Uri teToilART () and 
ESP_ReadFromUART() allow direct access 
to the UART registers in Enhanced Mode. 
Because many ESI commands read and 
write these same registers, you must 
restrict your access to certain registers 
or the ESP will lose track of the current 
state of the UARTs. Specifically, you 
must never write to the Interrupt 
Enable, FIFO Control, or Modem Control 
registers in Enhanced Mode. Similarly, 
you must never read the Receive Buff¬ 
er, Line Status, or Modem status 
registers. In practice, the only register 
you should need to access in Enhanced 
Mode is the Line Control Register. 

The ESP_SetBaudRate() function is 
the preferred method of specifying the 
line speed in Enhanced Mode. Because 
the UARTs on the ESP use the standard 
1.8432 Mhz crystal, they are limited to a 
maximum of 115,200 baud. The ESI 
specification explicitly states that the 
ESP will only support up to 57,600 baud 
in Enhanced Mode. Ironically, the faster 
115,200 baud rate can only be achieved 
in Comparability Mode. 

The ESP_GetMode() and ESP_Set- 
Mode() functions together provide com¬ 
plete control over all the possible com¬ 
munications modes. To set up a mode 
you must choose Comparability Mode 
or Enhanced Mode and combine it with 
further option flags. The modes for each 
ESP port operate independently. For ex¬ 
ample, you can run Port 1 in Com¬ 
parability Mode and simultaneously run 
Port 2 in Enhanced Mode. 

In Comparability Mode, you may 
choose whether or not to enable the 
16550 UART FIFOs. Also, you can select 
from RTS, DTR, or no flow control. In En¬ 
hanced Mode, you need only select 
whether you want DMA or Programmed 
I/O transfers for sending or receiving 
characters. Programmed I/O is Hayes 
nomenclature for accessing the ESP as if 
it were a standard UART (sans DMA). 
Bitmask flags for all these values are 
listed as the constants “ESP_M0DE_..." in 
Listing 2. 
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Listing 2 (esp.h) 


#define OK 1 




#define FAIL 0 




#define bool short 




/* ESP Registers: */ 




#define ESP REG READY 

0 



Idefine ESP REG SID 

1 



Idefine ESP REG RX1 

2 



#define ESP REG TX1 

3 



Idefine ESP REG RX2 

4 



Idefine ESP REG TX2 

5 



#define ESP REG STATUS1 

6 



Idefine ESP REG CMD1 

7 



Idefine ESP REG STATUS2 

8 



Idefine ESP REG CMD2 

9 



Idefine ESP DMA RX 

10 



Idefine ESP_DMA_TX 

11 



/* ESP Registers Offsets */ 




Idefine ESP REG READY OFFS 

0x00 



Idefine ESP REG SID OFFS 

0x01 



Idefine ESP REG RX1 OFFS 

0x02 



Idefine ESP REG TX1 OFFS 

0x02 



Idefine ESP REG RX2 OFFS 

0x03 



Idefine ESP REG TX2 OFFS 

0x03 



Idefine ESP REG STATUS1 OFFS 

0x04 



Idefine ESP REG CMD1 OFFS 

0x04 



Idefine ESP REG STATUS2 OFFS 

0x05 



Idefine ESP REG CMD2 OFFS 

0x05 



Idefine ESP DMA RX OFFS 

0x06 



Idefine ESP_DMA_TX_0FFS 

0x06 



/* Bit flags for ESP Registers 

ESP_REG 

READY */ 


Idefine ESP REG RX1 RDY 

0x01 



Idefine ESP REG TX1 RDY 

0x02 



Idefine ESP REG RX2 RDY 

0x04 



Idefine ESP REG TX2 RDY 

0x08 



Idefine ESP REG STATUS1 RDY 

0x10 



Idefine ESP REG CMD1 RDY 

0x20 



Idefine ESP REG STATUS2 RDY 

0x40 



Idefine ESP_REG_CMD2_RDY 

0x80 



typedef struct esp reg { 




short reg offset; /* Offset of register from base address */ 


short ready flag; /* Mask for ready status checking */ 


) ESP_Reg; 




/* ESP Command Codes: */ 




Idefine ESP CM0 RESET 


0x00 /* General Commands 

*/ 

Idefine ESP CMD GET SELF TEST 

RES 

0x01 


Idefine ESP CMD GET C0MPAT DIPS 

0x02 


Idefine ESP_CMD_D0WNL0AD_C0DE 


0x03 


Idefine ESP CMD SET INTR AND DMA 

0x04 /* Setup Commands 

*/ 

Idefine ESP CMD SET DMA TIMEOUT 

0x05 


Idefine ESP CMD SET SERVICE MASK 

0x06 


Idefine ESP CMD SET ERROR MASK 


0x07 


Idefine ESP CMD SET FLOW CTRL TYPE 

0x08 


Idefine ESP CMD SET FLOW CTRL 

CHAR 

0x09 


Idefine ESP CMD SET RX FIFO LEVEL 

OxOA 


Idefine ESP CMD SET FIFO TRIGGER 

OxOB 


Idefine ESP CMD SET RCV CHAR TM0 

OxOC 


Idefine ESP CMD SET FLOW OFF TM0 

OxOD 


Idefine ESP CMD WRITE TO UART 


OxOE 


Idefine ESP CMD READ FROM UART 


OxOF 


Idefine ESP CMD SET BAUD RATE 


OxlD 


Idefine ESP CMD GET MODE 


OxlE 


Idefine ESP CMD SET MODE 


0x10 


Idefine ESP CMD CLEAR DMA SERV Rq 

Oxll /* Operating Commands 

*/ 

Idefine ESP CMD GET ERROR STATUS 

0x12 
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Listing 2 — Cont’d 

#define ESP CMD GET UART STATUS 

0x13 

♦define ESP CMD GET RX BYTES AVAIL 

0x14 

♦define ESP CMD GET TX BYTES AVAIL 

0x15 

Idefine ESP CMD INIT DMA RECEIVE 

0x16 

Idefine ESP CMD INIT DMA TRANSMIT 

0x17 

Idefine ESP CMD FLOW OFF LOC XMIT 

0x18 

Idefine ESP CMD FLOW ON LOC XMIT 

0x19 

Idefine ESP CMD ISSUE LINE BREAK 

OxlA 

Idefine ESP CMD FLUSH RX FIFO 

OxlB 

Idefine ESP CMD FLUSH TX FIFO 

Ox 1C 

/* ESP port qualifier OR'ed with CMD code: */ 

Idefine ESP P0RT1 

0x00 

Idefine ESP_P0RT2 

0x80 

Idefine ESP MAX ENH BAUD 

57600L 

Idefine ESP_MAX_COMP_BAUD 115200L 

/* Bit flags for ESP_CMD_GET_SELF_TEST_RES */ 

Idefine ESP TEST RAM FAIL 

0x01 

Idefine ESP TEST ROM FAIL 

0x02 

Idefine ESP TEST 8K ROM 

0x04 

♦define ESP TEST MCA BUS 

0x08 

Idefine ESP_TEST_2_P0RT 

0x10 

/* Bit flags for ESP_CMD_SET_INTR_AND 

_DMA */ 

/* choose one from each group below: 

*/ 

Idefine ESP_SET_ENH_INTR_ON 

0x01 

Idefine ESP SET ENH IRQ9 

0x00 

Idefine ESP SET ENH IRQ3 

0x02 

Idefine ESP SET ENH IRQ4 

0x04 

Idefine ESP_SET_ENH_IRQ5 

0x06 

Idefine ESP SET DMA OFF 

0x00 

Idefine ESP SET DMA1 

0x10 

Idefine ESP_SET_DMA3 

0x30 

/* Bit flaqs for ESP CMD SET SERVICE 

MASK */ 

Idefine ESP SERV P0RT1 RX FIFO 

0x01 

Idefine ESP SERV P0RT1 TX FIFO 

0x02 

Idefine ESP SERV PORT1 ERROR 

0x04 

Idefine ESP SERV DMA TERMINATE 

0x08 

Idefine ESP SERV P0RT2 RX FIFO 

0x10 

Idefine ESP SERV P0RT2 TX FIFO 

0x20 

Idefine ESP SERV PORT2 ERROR 

0x40 

Idefine ESP SERV DMA TIMEOUT 

0x80 

/* Bit flags for ESP CMD SET ERROR MASK: Byte 1 */ 

Idefine ESP ERR RCV CHAR TMO 

0x01 

Idefine ESP ERR RCV FIFO OVERFLOW 

0x02 

Idefine ESP ERR PARITY ERROR 

0x04 

Idefine ESP ERR FRAMING ERROR 

0x08 

Idefine ESP ERR BREAK DETECT 

0x10 

Idefine ESP ERR UART STATUS 

0x20 

Idefine ESP ERR FLOWED OFF TMO 

0x40 

Idefine ESP ERR BREAK XMIT DONE 

0x80 

Idefine ESP ERR ALL BYTE 1 

OxFF 

/* Bit flags for ESP CMD SET ERROR MASK: Byte 2 */ 

Idefine ESP ERR REMOTE TX F OFF 

0x01 

Idefine ESP ERR LOCAL TX F OFF 

0x02 

♦define ESP ERR LOCAL TX F ON 

0x04 

Idefine ESP_ERR_ALL_BYTE_2 

0x07 

/* Bit flags for ESP CMD GET/SET MODE 

*/ 

Idefine ESP MODE ENHANCED 

0x01 

Idefine ESP MODE COMP UART FIFO 

0x02 

Idefine ESP MODE COMP RTS FLOW 

0x04 

Idefine ESP MODE COMP DTR FLOW 

0x08 

Idefine ESP MODE ENH RX DMA 

0x10 

Idefine ESP MODE ENH TX DMA 

0x20 




Operating Commands 

The ESP_GetErrorStatus() com¬ 
mand should be called when an inter¬ 
rupt occurs and the Service ID register 
indicates an Error Status service request 
is pending. The Error Status service re¬ 
quest must have been previously 
enabled by ESP_SetServiceRequest- 
Mask(). The bitmask flags for the pos¬ 
sible error conditions are identical to 
those specified in the earlier call to 
ESP_SetErrorStatusMask(). These flags 
are listed as the constants ~ESP_ERR_...’ 
in Listing 2. 

ESP_GetUARTStatus () allows you to 
read the UART Line Status Register and 
UART Modem Status Register in En¬ 
hanced Mode. As stated earlier, these 
two registers cannot be read by the 
ESP_ReadFromUART() functions when in 
Enhanced Mode. Conversely, this func¬ 
tion may not be called when in Com- 
patability Mode. 

The ESP_GetRXBytesAvail() and 
ESP_GetTXSpaceAvail() commands in¬ 
form you about the state of the FIFO 
buffers in Enhanced Mode. Both func¬ 
tions return the amount of space left 
rather than the amount of space used. 
If there is a character currently in the 
UART’s receive register, then the RX 
FIFO count will be one character too 
high. 

ESP_IssueLineBreak() provides a 
high-level mechanism for controlling the 
BREAK signal. Remember that BREAK is 
not a character, but a signal created by 
holding the line low for at least 1-1/2 
times the period required to send a 
character. You can still manually control 
the BREAK signal by writing to the 
UART's Line Control Register in En¬ 
hanced Mode, if you so desire. 
ESP_IssueLineBreak() automatically 
waits for the transmit FIFO buffer to 
empty out before asserting the BREAK 
signal. This function operates in an 
asynchronous fashion: instead of wait¬ 
ing for the BREAK duration to finish, it 
immediately returns control. An inter¬ 
rupt will be generated upon completion 
of BREAK transmission if previously 
enabled via ESP_SetServiceRequest- 
Mask() and ESP_SetErrorStatusMask(). 

The ESP_FlushRxFIFO() and ESPJlush- 
TxFIFOf) commands can be used to im¬ 
mediately clear all pending characters in a 
queue. The flush functions clear the 
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UART FIFO, and ESP FIFOs, and the ESP 
Received Data Port 1 and 2 registers. 

Sample Programs 

In order to test out the feasibility of 
my ESI interface library, I wrote two 
short test programs. The first program, 
ESPINFO.C in Listing 4, prints a report 
containing all the information available 
about the ESP. This information includes 
DIP switch settings, self-test results, and 
UART addresses (see Figure 7). This pro¬ 
gram might be helpful as a quick sanity 
test of your ESP. The ESPINFO program 
only requires about half a dozen of the 
ESI interface library functions. 

The second program that uses my 
ESI interface library is ESPINIT.C shown 
in Listing 5. This program demonstrates 
the correct calling sequence needed to 
initialize the ESP for Enhanced Mode 
communications. This calling sequence 
complies with the guidelines in section 
4.1 of the ESI specification. 

I have purposely omitted presenting 
an interrupt-driven serial communica¬ 
tions handler in this suite of functions. 
Recent journals and technical books 
have thoroughly covered this topic. See 
the bibliography accompanying this ar¬ 
ticle for a short list of sources. 

Both of the sample programs are 
designed specifically for the AT-bus ver¬ 
sion of the ESP and must be modified to 
use with the ESP-PS/2. This is primarily 
because information normally obtained 
through ESI calls on the ESP-AT must be 
obtained through Programmable Option 
Select (POS) BIOS calls on PS/2s. 

Potential Preemptive Pitfalls 

Because the ESP is implemented as a 
single microprocessor configuration, 
there is a potential conflict in Enhanced 
Mode with a pre-emptive multitasking 
system. This problem is absent in Com¬ 
patibility Mode because the UARTs are 
designed to operate autonomously. This 
situation can also be circumvented 
when an OS-level device driver, such as 
the ESP0S2.SYS driver supplied for OS/2, 
coordinates transmitting and receiving 
characters. The problem occurs when 
two independent applications issue En¬ 
hanced Mode commands without the 
other’s knowledge. The situation can 
arise from two separate sets of condi¬ 
tions. Both scenarios arise from the fact 
that the ESI Command and Status 



Listing 2 — Cont’d 

typedef struct esp handle ( 


short base addr; 

/* Base address of ESP registers 

*/ 

short uart addr; 

/* Base address of NS16550 UART 

*/ 

short dma; 

/* DMA channel number 0-9 

*/ 

short irq; 

/* IRQ level 

*/ 

short esp no; 

/* Which ESP board 

*/ 

short port; 

) ESP_Handle; 

/* Which port on the ESP board 

*/ 

/* End of File */ 




Listing 3 (esp.fu) 


short ESP_Reset(); 

void E$P_GetSelfTestResults(); 

short ESP_GetNormalModeAddrSwitch(); 

void ESP_DownloadESPCode(); 

void ESP_SetEnhancedIntAndDMA(); 

void ESP_SetDMAtimeout(); 

void ESP_$etServiceRequestMask(); 

void ESP_SetErrorStatusMask(); 

void ESP_SetFlowControlType(); 

void ESP_SetFlowControlChars(); 

void ESP_SetRXFlowControlLevels(); 

void ESP_SetFIFOTriggerLevels(); 

void ESP_SetReceiveCharTimeout(); 

void ESP_SetFlowedOffTimeout(); 

void ESP~WriteToUART(); 

short ESP_ReadFromUART(); 

void ESP_SetBaudRate(); 

void ESP_GetMode(); 

void ESP_GetErrorStatus(); 

void ESP_GetUARTStatus{); 

void ESP_InitiateDMAReceive(); 

void ESP_InitiateDMATransmit(); 

void ESP_FlowOffLocalTransmitter(); 

void ESP_FlowOnLocalTransmitter(); 

void ESP_IssueLineBreak(); 

void ESP_F1 ushRxFIFO(); 

void ESP_F1ushTxFIFO(); 

short ESP_WaitRead(); 

void ESP_WriteReg(); 

void ESP~WriteCmdl(); 

short ESP_WriteCmd2Wait(); 

void ESP_WriteCmd2WaitWord(); 


Listing 4 (espinfo.c) 

#include <stdlib.h> 
linclude <stdio.h> 
linclude <conio.h> 

#include "esp.h" 

♦include "esp.fu" 

#define OK 1 

♦define FAIL 0 

♦define bool short 

int main(); 

short ESP_InfoReport(); 
void DisplayAttributes(); 

struct attr_list { 

short attr_val; /* Bitmask value for “AND" comparison */ 

char *attr_false; /* Display this string if masked false */ 

char *attr_true; /* Display this string if masked true */ 

) AttrList; 

struct attrjlist test_attrs[] = { 

{ ESP_TEST_RAM_FAIL, 

"RAM test 0K“7 "RAM test FAILED" }, 
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Listing 4 — Cont’d 

{ ESP_TEST_ROM_FAIL, 

“ROM test OK", "ROM checksum FAILED" ), 

{ ESP_TEST_8K_R0M, 

"ROM size is 4K\ "ROM size is 8K" ), 

{ ESP_TE$T_MCA_BUS, 

"AT ISA-compatible bus", "PS/2 MCA-compatible bus" }, 

{ ESP_TEST_2_PORT, 

"Single-port ESP interface (phantom product)", 

"Dual-port ESP interface" ) 

); 

struct attr_list mode attrs[] * { 

{ ESP_MODE_ENHANCED, 

“Compatibility Mode enabled", "Enhanced Mode enabled" ), 

{ ESP_MODE_COMP_UART_FIFO, 

"Compatibility Mode UART FIFO disabled", 

"Compatibility Mode UART FIFO enabled" j, 

( ESP_MODE_COMP_RTS_FLOW, 

"Compatibility Mode RTS flow control disabled", 
"Compatibility Mode RTS flow control enabled" ), 

{ ESP_MODE_COMP_DTR_FLOW, 

"Compatibility Mode DTR flow control disabled", 
"Compatibility Mode DTR flow control enabled" ), 

{ ESP_MODE_ENH_RX_DMA, 

"Enhanced Mode RX is Programmed I/O Mode", 

"Enhanced Mode RX is Direct Memory Access Mode" ), 

( ESP_MOOE_ENH_TX_DMA, 

"Enhanced Mode TX is Programmed I/O Mode", 

"Enhanced Mode TX is Direct Memory Access Mode" ) 

); 

Idefine NUM_TEST_ATTRS (sizeof(test_attrs) / sizeof(AttrList)) 
Idefine NUM_MODE_ATTRS (sizeof(mode_attrs) / sizeof(AttrList)) 

extern short esp_uart_addr[], esp_irq[]; 

main(argc.argv) 
int argc; 
char **argv; 

{ 

return ESP InfoReport(); 

) 


short ESP_InfoReport() 

( 

ESP_Handle espl, esp2; 
short rom rev; 
short test_results; 
short dips; 
short def_mode; 
short curjnode; 

if (!ESP_InitHandle(&espl, 1, 1)) 
return FAIL; 

if (1ESP_InitHandle(&esp2, 1, 2)) 
return FAIL; 

ESP_Reset(&espl); 

ESP_GetSelfTestResults(&espl, 4rom_rev, &test_results); 
if (rom_rev > OxOF || test_results > 0x20) ( 

printf("ESP port address incorrect or no ESP foundlW); 
return FAIL; 

) 

printf("ESP Information report\n\n"); 
printf("Firmware revision %d.00.\n“, rom rev); 
DisplayAttributes(test_attrs,NUM_TEST_ATTRS,test_results); 
if (!(dips=ESP_GetNormalModeAddrSwitch(Sespl))) I 
printf("No additional info for MCA-bus card\n“); 
return OK; 

) 

printf("\nDIP switch settings indicated"); 
printf("Port 1: UART address is %XH, IRQ level %d\n", 


registers must be managed as a shared 
resource. 

First, it is possible in a pre-emptive 
multitasking system, such as DESQview 
2.31, that two independent tasks collide 
in their use of Command and Status 
registers. For example, process A issues 
a command such as GetRxBytes- 
Availf) on port 1 which returns a two- 
byte integer in Statusl and Status2. 
Flowever, process A may be pre¬ 
empted before it gets to read Statusl 
and Status2. Meanwhile, process B is 
restarted just as it is about to issue a 
GetErrorStatus() on port 2, which 
returns two bytes worth of flags in 
Statusl and Status2. Now, either 
process A or B must be stuck with a 
bogus return value for its request. Ms. 
Flazzah of Fiayes Product Development 
confirmed that in this situation “Both 
applications and the ESP firmware 
would become confused and the whole 
system would probably lock up.” 

This problem can only be overcome 
with proper critical section handling. For 
example, you could disable interrupts 
during the ESI command. A better ap¬ 
proach is to use the critical section 
facilities provided by whatever multi¬ 
tasking operating system you are using. 

The second problem is that some ESI 
commands implicitly affect both com¬ 
munications ports without regard to 
their previous state. The most notable 
offender is ESPJSetServiceRequest- 
Mask(). This function is absolutely re¬ 
quired in all non-trivial Enhanced Mode 
applications. The Service Request Mask 
determines which of the following con¬ 
ditions are allowed to generate an in¬ 
terrupt: Port 1 FIFOs full, Port 2 FIFOs full, 
Port 1 errors, Port 2 errors, and DMA 
termination. If two plain DOS applica¬ 
tions are running in a standard multi¬ 
tasking system, without knowledge of 
each other’s operations, then neither 
application could correctly set the Ser¬ 
vice Request Mask. 

You could prevent this problem by 
providing an ESP_GetServiceRequest- 
Mask() function. Although Fiayes 
Product Development conceded that 
such a function was possible, they ruled 
out its use or implementation by third- 
party developers. They said “very few 
users will be running two separate DOS 
applications which both access an ESP 
port in Enhanced Mode.” The Service 
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Request Mask dilemma can only be 
solved by using an OS-level driver, such 
as ESP0S2.SYS for OS/2, which sensibly 
arbitrates the Service Request Mask set¬ 
tings. 

Speed Limit: 57,600 Baud 

Today, the industry-standard high¬ 
speed modems are based on the CCITT 
v.32bis link combined with v.42bis data 
compression. The v.32bis standard 
provides an underlying transmission 
speed of 14,400 baud. The v.42bis adds 
dynamic data compression at up to 4:1 
when transmitting uncompressed data. 
To achieve maximum throughput with 
this combination, you must open the 
serial port at 14,400 * 4 = 57,600 baud. 
This is the top speed of the ESP board 
in Enhanced Mode. 

The CCITT Study Group XXVII, which 
is responsible for setting international 
telecommunications standards, has 
been defining the next generation high¬ 
speed modem link. This specification, 
tenatively labeled v.FAST, will push 
modem performance to the edge of its 
capacity over voice-grade telephone 
lines. The plan calls for an underlying 
transmission speed of at least 24,000 
baud. When you factor in v.42bis 
dynamic data compression, you need to 
open the serial port at 24,000 * 4 = 
96,000 baud for maximum throughput. 

The v.FAST modems, which could ap¬ 
pear in late 1993, could easily outpace 
the ability of the ESP adapter in its 
maximum Enhanced Mode speed of 
57,600 baud. The potential 96,000 baud 
serial port speed that v.FAST requires 
can only be achieved in Comparability 
Mode. Comparability Mode, in which the 
communications coprocessor and IK 
FIFOs are disabled, is capable of 115,200 
baud. 

Conclusion 

The Hayes Enhanced Serial Interface 
specification provides a high-level 
mechanism for programming the En¬ 
hanced Serial Port. If you’re using a 
multitasking environment that already 
manages the ESI, then you need no 
extra programming. However, if you are 
writing for a plain DOS environment, 
you will need to design your own En¬ 
hanced Mode driver. The C-callable 
function library presented here might 
reduce the burden of writing Enhanced 
Mode drivers for the ESP. 


Listing 4 —Cont’d 

esp_uart_addr[dips & 0x07], esp_irq[dips & 0x07]); 
dips »« 4; 

printf("Port 2: UART address is VXH, IRQ level %d\n", 
esp_uart_addr[dips & 0x07], esp_irq[dips & 0x07]); 

ESP_GetMode(&espl, &def_mode, &cur_mode); 
printf("\nPort 1 Current Mode Attributes:\n"); 
DisplayAttributes(mode_attrs, NUM_M0DE_ATTRS, cur_mode); 

ESP_GetMode(&esp2, &def_mode, &cur_mode); 
printf("\nPort 2 Current Mode Attributes:\n"); 
DisplayAttributes(mode_attrs, NUM_M0DE_ATTRS, cur_mode); 

printf(“\nPort 1 Bytes waiting to be read from RX Buffer: %d\n", 
E$P_GetRXBytesAvai1(&espl)); 

printf("Port 1 Bytes available to be written in TX Buffer: %d\n", 
ESP_GetTX$paceAvail(&espl)); 

printf("\nPort 2 Bytes waiting to be read from RX Buffer: %d\n", 
ESP_GetRXBytesAvai1(&esp2)); 

printf(“Port 2 Bytes available to be written in TX Buffer: %d\n", 
ESP_GetTXSpaceAvail(&esp2)); 
return OK; 


void DisplayAttributes(attr_ptr, attr_count, source_info) 
struct attr_list *attr_ptr; 
short attr_count; 
short source_info; 

{ 

int i; 

char *use_str; 

for (i=0; i<attr_count; i++) 

{ 

if (attr_ptr[i].attr_val & source_info) 
use_str * attr_ptr[i].attr_true; 
el se 

use_str = attr_ptr[i].attr_false; 
printf("\t%s.\n",use str); 

I 


/* End of File */ 


Listing 5 (espinit.c) 

#include <stdlib.h> 

♦include <stdio.h> 

♦include <conio.h> 

♦include "esp.h" 

♦include "esp.fu" 

♦define OK 1 

♦define FAIL 0 

♦define bool short 

Idefine LINE_C0NTR0L_REG 3 

♦define EIGHT_BITS 0x03 

♦define N0_PARITY 0x00 

♦define 0NE_ST0P_BIT 0x04 

♦define SDU_$IZE 8L /* 8 data + 1 start + 1 stop */ 

main(argc.argv) 
int argc; 
char **argv; 

{ 

ESPHandle esp; 

printf("Setting up for Enhanced Mode\n“); 

if (!setup_handle_params(&esp)) 
return FAIL; 
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Although the ESP was designed specifically to reduce the 
strain of high-speed serial communications in a multitasking 
environment, extra care must be taken when writing plain 
DOS applications that use the Enhanced Mode with a multitas¬ 
ker. For many applications, the ESP may be what you need for 
effective high-speed communications in the background. □ 
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Listing 5 —Cont’d 


if (!ESP_SetupEnhancedMode(&esp)) 
return FAIL; 

printfC'Setup complete.\n“); 
return OK; 


int setup_handle_params(esp_h) 

ESP Handle *esp_h; 

{ 

short port; 
short espno; 

printf("Use which ESP board (1-2): “); 

scanf(”%d", &esp_no); 

printf(”Use which ESP port (1-2): “); 

scanf("%d“, &port); 

if ((esp_no < 1) |j (esp_no > 2) || 

(port < 1) || (port > 2)) ( 
printfCInvalid ESP board and/or port no.\n“); 
return FAIL; 

) 

if (!ESP_InitHandle(esp_h, esp_no, port)) 
return FAIL; 

) 

/* Simplified Enhanced Mode operation: 

* No DMA 

* 8 bits, no parity, 1 stop bit 

* user-defined baud rate 

* interrupt on receive FIFO, transmit FIFO, or error 

After this function returns, the application is ready to install 
the serial interrupt handler as usual.. */ 

int ESP_SetupEnhancedMode(esp_h, baudjrate) 

ESP_Handle *esp_h; 
long baud rate; 

{ 

long recv_tmo; 

/* This is the only time you ever need to call this func */ 

ESP WriteToUART(esp_h, LINE_CONTROL_REG, 

EIGHT_BITS | N0_PARITY | 0NE_ST0P_BIT); 

/* Disable INTs until everything is ready to go */ 
ESP_SetEnhancedIntAndDMA(esp_h, 0); 


/* Ignore if you're not using DMA */ 

ESP_SetDMAtimeout(esp_h, 0); 

if (esp_h->port ■* 1) 

ESP_SetServiceRequestMask(esp_h, ESP_SERV_P0RT1_RX FIFO | 
ESP_SERV_P0RT1_TX FIFO | ESP_SERV_P0RT1_ERR0R); 

else 

ESP_SetServiceRequestMask(esp_h, ESP SERV P0RT2_RX FIFO | 
ESP_SERV_P0RT2_TX_FIF0 | ESP_SERV_P0RT2_ERR0R); 

/* Interrupt on all possible error and status changes */ 

ESP SetErrorStatusMask(esp_h, ESP ERR ALL_BYTE 2, 
ESP_ERR_ALL_BYTE_2); 

/* Flow control OFF at 768 chars, back on at 512 chars */ 
ESP_SetRXFlowControl Levels(esp_h, 768, 512); 

/* Trigger receive interrupt at 256 chars, 
transmit interrupt at 768 chars */ 
ESP_SetFIFOTriggerLevels(esp_h, 256, 768); 

/* Suggested timeout is 4 x character transmission speed, 
but no less than 2 ms */ 
recv_tmo = ((baud_rate * 4L) / SDU_SIZE) / 1000L; 
recv_tmo * min(recv_tmo, 2L); 

ESP_SetReceiveCharTimeout(esp_h, (short)recv_tmo); 

/* Maximum time we want to be flowed off, sugg. 60 ms */ 
ESP_SetFlowedOffTimeout(esp_h, 60); 

ESP_SetBaudRate(esp_h, baud_rate); 

ESP_SetMode(esp_h, ESP_M0DE_ENHANCED); /* No DMA */ 

/* Enable INTs and keep same IRQ as used in Comp. Mode */ 
if (esp_h->port == 1) 

ESP SetEnhancedIntAndDMA(esp h, ESP_SET_ENH INTR ON | 
ESP_SET_ENH_IRQ4 | ESP_SET_DMA_0FF);“ 

else 

ESP SetEnhancedIntAndDMA(esp h, ESP SET_ENH_INTR_0N | 
ESP_SET_ENH_IRQ3 | ESP_SET_DMA_0FF);“ 
return OK; 


/* End of File */ 
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Windows 3.0 Power Programming Techniques 

Reviewed By Jeff Cochran 


Windows 3.0 Power Programming Techniques, Peter Nor¬ 
ton and Paul Yao, Bantam Books, ISBN: 0-553-34940-6, 939 
pages, $26.95. 


Peter Norton and Paul Yao have written the most usable 
addition to the Microsoft Windows Software Developers Kit 
(SDK) on the market today. Going beyond the simple presenta¬ 
tion of code fragments, followed by terse descriptions of 
functionality, Windows 3.0 Power Programming Techniques 
documents how Windows is working and how the program¬ 
mer can best take advantage of the Windows environment. 

The book begins with an introduction to Windows and 
quickly follows it with the more-or-less standard "minimum” 
Windows program that simply displays an application window. 
Breaking immediately with the SDK and other guides to Win¬ 
dows programming, Norton and Yao create the various 
resouce components of the application window style (icons, 
cursors, etc.) in their introductory program and show how the 
resources and code relate to the various steps involved in 
constructing a Windows application. And with this simple ex¬ 
ample, Power Programming Techniques introduces the method 
the authors use throughout to teach first-time Windows 
programmers. 

Instead of rushing through Windows, building more com¬ 
plex and less obvious applications, Norton and Yao step back 
to explain in detail the "why" of modules that make a Win¬ 
dows application. Power Programming Techniques unravels the 
event-driven, non-procedural methodology behind Windows 
applications by explaining in detail the WINMAIN function, win¬ 
dow procedures, messages and messaging, system resource 


management and the Graphical Device Interface. In short, 
Power Programming Techniques teaches you how to program 
for Windows by explaining how windows works. 

This method of instruction is carried through the book. For 
example, it is imperative that the Windows programmer know 
that system resources can only be “borrowed" from the Win¬ 
dows environment. Norton and Yao present this concept to 
the reader by using a sandwich metaphor. The sandwich con¬ 
sists of the request to Windows for the resource (the top slice 
of bread), the use of the resource by your application (the 
meat of the matter) and the return of the resource to Win¬ 
dows (the bottom bread slice). Figure 1 shows the sandwich 
needed to use the mouse for dragging or sizing objects within 
your application’s main window. Charles Petzold in his 
Programming Windows (either edition) states simply that 
when an application wants to capture the mouse, it uses Set- 
Capture(). To release the mouse it uses ReleaseCapture(). A 
Windows application can only capture the mouse when a 
user holds down a mouse button and has got to let it go 
when the user lets up (part of the style guide). Norton and 
Yao make this clear, Petzold doesn't. 

It is with this attention to method that Norton and Yao 
address real Windows application programming challenges en¬ 
countered by first-time applications developers. Topics such as 
device independence, coordinate transformation and applica¬ 
tion memory use are given necessarily detailed treatment. 


Jeff Cochran is a programmer/analyst working for Revelation Technologies, Inc Readers may contact him at 733 Summit Ave. E. 
#208, Seattle, WA 98102. 
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The "Windows Sandwich" That Allows an Application 
to Control the Mouse 
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MACRO DISASSEMBLER 


MD86 (Masterful Disassembler) is the 
most comprehensive macro disassembler 
on the market. Interactive by design not 
after-thought. Features include: 

► User defined macros with arguments 

► Auto code/data separation 

► Auto commenting and label naming 

► Command menus and help screens 

► Customizable disassembly options 

► Comprehensive, indexed, manuals 

► Fully supports 8086/87 thru 80486/87 

► COM/EXE/SYS/memory/other, 

► Cross reference and more! 

Still only $67.50 +tax ($1.50 s/h) 

C.C.SOFTWARE 
1907 ALVARADO AYE. 

WALNUT CREEK, CA 94596 
(415)939-8153 
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The book draws on the tools provided with the SDK. In¬ 
stead of simply documenting the menus on applications such 
as HEAPWALK and SPY, Norton and Yao use these tools in 
example situations explaining what the tools are reporting and 
what the information means to the application developer. 
Likewise, Power Programming Techniques presents, right up 
front, the various compiler and linker switches required to cor¬ 
rectly assemble a Window application for debugging or dis¬ 
tribution (unaddressed in other guides and buried in the SDK). 

The book's depth of background material is also its one 
true short coming. In 932 pages, there simply isn’t the space 
to cover such “powerful” Windows concepts as dynamic link 
libraries (DLL), dynamic data exchange (DDE) and multiple 
document interfaces (MDI). To my mind, some of the back¬ 
ground material is a little too elementary, as several pages are 
devoted to the segmented addressing of the Intel 80x86 chip 
family when discussing a FAR call. 

Programming for Windows is a formidable task. The basic 
“object-action,” event-driven interface runs counter to the pro¬ 
cedural “action-object” style that most programmers develop 
to. Power Programming for Windows doesn't attempt to map 
procedural thinking into the Windows environment (you won’t 
be shown how to print “Hello, world!” in the opening pages of 
the book). Instead, the authors assume that you want to 
know how to take advantage of the Windows environment. 
They deliver admirably on this assumption, and the book 
provides an invaluable resource for Windows programmers-to- 
be. □ 


TCP/IP for Windows | 


Network Windows™ Software Development Kit 


□ Three Application 
Programming Interfaces: 
Berkeley Sockets, Remote 
Procedure Call (RPC/XDR) 
and Network Windows 
(NFS client) 

□ Support for Microsoft 
Windows 3.0 in both 
Standard and Enhanced 
modes 

□ Shared library support in 
the form of Dynamic Link 
Libraries (DLLs) 

□ Standard NDIS packet 
driver interface 

□ May coexist with Microsoft 
LAN Manager 

□ Support for Ethernet and 
IBM Token Ring 


NFS i RPC 


Sockets } $495 


For more information 
call: 

(408) 741 0781 I 
or fax: 

(408) 741 0795 j 


□ Works with network adapters 
from 3COM, Western Digital, 
IBM and others 

□ Windows-based installation 

□ Three Windows applications 
included: 

♦ Network Configuration 

♦ Telnet-VTIOO 

♦ NFS Manager 



dfsimct 


Distinct Corporation 
P.O. Box 3410 Saratoga, CA 95070 
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Call For 

Papers 

TECH Specialist, the journal for advanced PC 
programmers, is seeking articles on the topics 
below. If you have an idea for a related story 
and experience that would especially qualify 
you to write on one of these topics, contact the 
TECH Spec editorial staff for Author Guidelines 
at: 

TECH Specialist 

2601 Iowa St. 

Lawrence, KS 66046 
(913) 841-1631 

FAX (913) 841-2624 

TOPICS 

Memory Management 

Networks 

■ Proposals due 7/8/91; 
manuscripts due 8/12/91. 

■ Proposals due 8/8/91; 
manuscripts due 9/13/91. 

Suggested topics: Minimizing page swapping in 
your Windows application. Using the DPMI memory 
management functions. Executing code in the High 
Memory Area (HMA). A garbage-collecting memory 
manager for Windows. Loading and executing 
another DOS program in your own memory area. 

Suggested topics: A description of the locking 
models of various networks. A MAKE program that 
distributes compiles across workstations. Rules for 
writing network-aware programs. A TSR that allows 
other workstations to access local resources. A 
Windows monitor that flashes when network disk 
space gets low. 

We prefer very practical and detailed treatments of 
real problems encountered when working on PC 
platforms. Topics should be of practical interest to 
professional developers working under MS-DOS or 
OS/2. Accompanying code may be in BASIC, Pas¬ 
cal, C, assembly, C++, or another language if the 
nature of the story requires it. 

We pay at rates competitive with other national 
technical journals and provide better editorial assis¬ 
tance than most. 

Proposals should include a short abstract, a one- 
page outline, and a brief resume of the author’s 
qualifications. When mailing the proposal, please 
include a hard copy and an ASCII text file on an 
MS-DOS formatted disk. 
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New Products 

Industry-Related News & Announcements 


GEM Technologies Releases DeskTop Ada 


DeskTop Ada is a development environment for the PC 
that includes an Ada compiler, an editor, mouse support, and 
graphics support, all for $149.95. The Ada compiler is 
validated, which means it has passed extensive testing to en¬ 
sure compatibility with the Ada language specification. 
Government contracts may require the use of a validated 
Ada compiler. The compiler and linker are accessible without 
leaving DeskTop Ada. You can set compiler and linker op¬ 
tions from within the desktop environment 

The desktop editor handles lines of up to 132 characters 
and files up to available base memory. The editor provides 
key emulation modes for MS-Word, WordPerfect, and 
Wordstar. The user interface takes advantage of SAA pull¬ 
down menus, horizontal and vertical scroll bars, and point- 


and-shoot mouse support, so you can easily mark, delete, 
and move text Graphics support allows you to read and 
write PC Paintbrush graphics files in up to 256 colors. You 
can also animate graphics images obtained from PC 
Paintbrush, a scanner, or some other graphics source. 

The compiler supports all Intel processors from the 8086 
through the 80486. The math coprocessor is supported, if 
present All programs developed with DeskTop Ada will run 
with 640Kb of memory. GEM Technologies charges no royal¬ 
ties for developed programs. The compiler requires 640Kb of 
RAM and a 5Mb hard drive. For more information, contact 
GEM Technologies, 100 Main St., Old Saybrook, CT 064/5, 
(800) 232-3989, FAX (203) 395-1355. 


Visual Basic Arrives 

Microsoft has announced Visual Basic, a graphical applica¬ 
tion development system for Windows 3.0. Visual Basic 
users can create Windows applications that take advantage 
of pull-down menus, graphics, animation, DDE, DLLs, and mul¬ 
titasking. Once the application is complete, you can create a 
stand-alone EXE that you can distribute without royalties or 
runtime fees. 

Visual Basic offers interactive window and dialog box 
design. You select an item from a Toolbox of user interface 
controls and place and size them on a form. The Toolbox in¬ 
cludes all the standard Windows controls, such as comand 
buttons, option buttons, check boxes, text fields, and so on. 

A Control Development Kit that allows developers with 
Microsoft C and Windows SDK to develop their own custom 
controls for Visual Basic A variety of third parties are 
developing such extensions. 


The Visual Basic language itself is a derivative of 
Microsoft QuickBasic, cast in an event-driven mold. You write 
procedural code and associate it with a particular Window 
event, such as a button being pressed. The compiler features 
incremental compilation for early syntax error detection. 
Debugging features allow you to break and single-step 
through source code. 

Visual Basic requires Windows 3.0 (standard or enhanced 
mode only) or higher and a PC with at least an 80286 and 
one megabyte of memory. The suggested retail price for 
Visual Basic is $199; the Control Development Kit sells for 
$49.95. For more information, contact Microsoft Corpora¬ 
tion, One Microsoft Way, Redmond, WA 98052-6399, 

(206) 882-8080; FAX (206) 883-8101. 


32-Bit Basic Released 

32 Bit Software has released ZBasic v4.6, which allows 
programmers to write Basic programs that take advantage 
of the 32-bit instruction set of 386 and 486 PCs. Programmers 
can develop software on a non-386 machine and recompile 
them in the 32-bit version to obtain 32-bit software. Source 
code can be used with the Apple, TRS80, and Macintosh ver¬ 
sions of the Zedcor ZBasic 

ZBasic also supplies device-independent graphics support 
for VGA and MCGA, recognizing all graphics screens with the 


same code. Communications capabilities include an interrupt- 
driven 64K buffer that supports up to four ports simul¬ 
taneously at speeds up to 115K baud. 

ZBasic sells for $149.95 and is available at an introductory 
price of $99.95. Existing ZBasic users can upgrade for $59.95. 
For more information, contact 32 Bit Software, 3232 Mc¬ 
Kinney Ave, Suite 865, Dallas, TX 75204, (800) 322-4879; 
FAX (214) 855-0677. 
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mdbs Finalizes Object/1 For Windows 

Micro Data Base Systems, Inc is now shipping the final 
release of Object/1 for Windows. Object/1 was first available 
for PM. It is a rapid application development environment for 
creating Windows applications. Object/1 is an interpreted, ob¬ 
ject-oriented language (the syntax is reminiscent of C++), 
with an interactive screen designer, a class library, database 
support, and access to DDE and DLLs. 

The Object/1 Forms Painter is both an interactive screen 
designer and an intelligent code generator. After you design 
the form you want, the Forms Painter generates working 
source code for a class that implements the form. You can 
then tailor and extend this code by editing or adding to the 
class methods. Object/1 includes a browser for inspecting 
and editing source code. 


Object/1 provides a relational database system with an 
object-oriented access protocol. The database facilities sup¬ 
port multi-Field indexes, field-at-a-time updating, record lock¬ 
ing, and network functions. Object classes are included that 
allow you to access multiple external databases, such as 
MDBS IV, Microsoft SQL Server, and IBM Data Base Manager. 

Object/1 costs $995. The Object/1 Application Distribution 
System also costs $995 and is required for the royalty-free 
distribution of Object/1 applications. For a limited time, Ob¬ 
ject/1 for Windows is available bundled with SQL Server for 
$1,495. For more information, contact mdbs, Inc., Two Ex¬ 
ecutive Drive, P.O. Box 248, Lafayette, IN 47902-0248, 
(800) 344-5832; FAX (317) 448-6428. 


Tigre For Windows 3.0 Available 

Tigre Object Systems has announced the Windows ver¬ 
sion of the Tigre Programming environment for developing 
graphical user interface applications. Tigre is an object- 
oriented system based on Objectworks\Smalltalk Release 4, 
by ParcPIace Systems. Color applications created by Tigre will 
run without modification on Windows 3.0, Macintosh II, and 
workstations from Apollo, Digital, HP, IBM, and Sun. 

The Tigre Programming Environment consists of the Tigre 
Interface Designer and the multi-media-capable Tigris multi¬ 
user database system. The interface designer supplies a 
library of user interface object classes and a set of tools to 


manipulate them to form applications. Tigris provides multi¬ 
user access to arbitrary types of data, including variable- 
length text, icons, images, sounds, or any type of object You 
can quickly establish connections between any interface 
component and its underlying data representation. 

Tigre also supports AppleShare, enabling applications to 
run over heterogeneous networks of PCs and Macs. The Tigre 
Programming Environment for Windows 3.0 sells for $3,495. 
For more information, contact Tigre Object Systems, 3004 
Mission St, Santa Cruz, CA 95060, (408) 427-4900; FAX 
(408)457-1015. 


Memory Manager Speeds Windows Apps 


Emerging Technology Consultants has announced a new 
Paged Memory Manager (PMM) software tool for Windows 
and OS/2 Presentation Manager applications. PMM is a heap 
management system that can improve the performance of 
Windows and PM programs by minimizing Windows or PM 
rails to allocate or lock memory. PMM allocates fixed-size 
pages of memory and sub-allorates memory for your ap¬ 
plication from those pages. PMM includes a collection of 
debugging and statistics functions to aid development 
With a page size of 8Kb and an average memory alloca¬ 
tion of 80 bytes, PMM uses 6.5 bytes average overhead per 
allocation, compared with 32 bytes per allocation with stand¬ 


ard Windows function calls. To integrate PMM in your exist¬ 
ing C application, you call the PMM initialization function and 
replace the calls to allorateO, freeO, lockO, unlockO, and other 
memory management functions with calls to the equivalent 
PMM functions. 

The suggested retail price for both PMM for Windows 
and PMM for OS/2 PM is $295, or $495 for both of them. A 
source code license costs $2,500. For more information, con¬ 
tact Emerging Technology Consultants, Inc., 3405 Penrose 
Place, Boulder, CO 80301, (303) 447-9495; FAX (303) 447- 
9241. 
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PC Tools Supports Windows 

Central Point Software announced PC Tools v7.0, an up¬ 
date of its utility software package that provides three new 
Windows 3.0 applications and enhanced network utilities. A 
new Windows Backup utility allows you to perform backups 
in the background and is compatible with the stand-alone 
backup program. Windows Undelete recovers any undeleted 
file and Windows Launcher initiates any Windows or DOS ap¬ 
plication directly from the Windows 3.0 system menu. 

This version of PC Tools contains more than 10 new 
utilities. Virus Protection provides automatic virus detection 
on local and network drives, detects more than 600 known 


viruses and scans for unknown viruses. FileFix repairs 
damaged or corrupted dBase, Lotus 1-2-3 (including v3.1), 
and Symphony files. Commute is a remote-computing utility 
that provides remote access and file transfer for Windows 
and DOS applications via LAN, modem or direct connections. 

PC Tools 7.0 costs $ 179; registered users of previous ver¬ 
sions can upgrade for $49, plus shipping and handling. Users 
of competitive products can trade up to PC Tools 7.0 for $59 
through August 31. For more information, contact Central 
Point Software, 15220 N.W. Greenbrier Parkway, #200, 
Beaverton, OR 97006, (503) 690-8080; FAX (503) 690-8083. 
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Turn PC Into Protocol Analyzer 

Paladin Software, Inc has announced DataScope, a 
protocol analysis and data capture tool for PC users. With the 
aid of an RS-232 splice cable, you can use this software to 
monitor a serial communications line. DataScope can collect 
up to 8Mb of data and signal information with optional 
microsecond timestamp resolution. The software can 
operate at rates up to 115,200 baud while matching user- 
specified trigger strings against incoming data. The user inter- 


Asymetrix Updates ToolBook 

Asymetrix Corporation has released ToolBook vl.5, an 
upgrade of its software construction set for Windows 3.0. 
Version 1.5 offers a 100 percent speedup in the DayBook per¬ 
sonal organizer, support for larger files, the ability to import 
graphics, new developer tools, better network support and 
improved printing support ToolBook users can now translate 
Windows messages directly and produce dialog boxes 
without the need to write DLLs in C 

Asymetrix has also upgraded the TookBook Author's 
Resource Kit (ARK) to include the 1.5 version of development 
utilities and application examples. ARK purchasers receive 
distribution rights to royalty-free runtime versions of Tool¬ 
Book and enrollment in the ToolBook Developer Program. 


face supports multiple live, interactive, and historic data 
views. 

DataScope costs $189.95, which includes the software, 
documentation, two DB-25 or DE-9 connectors and one DB- 
25 RS-232 splice cable. The software is also available in 
shareware. For more information, contact Paladin Software, 
Inc., 3945 Kenosha Ave., San Diego, CA 92117, (619) 490- 
0368; FAX (619) 490-0177. 


The ARK also now includes the DLLs for the OS/2 version of 
ToolBook. ARK utilities include BookLook, an object-changing 
tool, Script Remover, a source-code protector, and Searcher, 
a tool for searching and modifying ToolBook elements such 
as text, object properties, and variables in scripts. Documen¬ 
tation includes tips and techniques in ToolBook program¬ 
ming, hints on conversion of 1.0 books to 1.5, and 
information on writing DLLs. 

TookBook vl.5 costs $395 and the general upgrade price 
is $75. The Author’s Resource Kit costs $450 and ARK 1.0 
users can upgrade for $75. Asymetrix’s Multimedia Resource 
Kit costs $300. For more information, contact Asymetrix Cor¬ 
poration, (800) 624-8999. 


Cognetic Releases Editor For Windows 

Cognetic Systems, Inc has introduced a new 
programmer’s editor, called CodePad, that runs as a Win¬ 
dows 3.0 application. CodePad allows you to simultaneously 
view and edit multiple source files in overlapping windows. 
The editor can handle large source files and has a "goto" 
line command that is useful for locating compiler errors by 
line number. 

You an choose from five different screen fonts for dis¬ 
playing text in CodePad. Fast dynamic scrolling moves text 


as you move the scroll tab, making browsing easier. Code- 
Pad comes with online hypertext help and a user's manual. 
Developers with the Windows SDK can mark Windows sys¬ 
tem calls in their source code then press a hot key to get 
SDK hypertext help for that function. 

CodePad requires a 386 PC or higher and Windows 3.0 
running in enhanced or standard mode. For more informa¬ 
tion, contact Cognetic Systems, Inc., 12534 Pinecrest Rd., 
Herndon, VA 22071, (703) 476-7154. 


Greenleaf Updates Communications Library 


Greenleaf has upgraded its CommLib C communications 
library to Level 2. CommLib Level 2 includes support for 
XMODEM, YMODEM, ZMODEM, Kermit, and ASCII file transfer 
protocols, XON/XOFF, RTS/CTS and DTR/DSR handshaking, sup¬ 
port for 16550 FIFO mode UARTs, Hayes Modem control, and 
interrupt-driven support for an unlimited number of serial 
ports. This version of the software now supports more kinds 
of hardware, systems, and protocols. 

Level 2 supports intelligent multi-port boards, which 
allow programmers to minimize demands on the host com¬ 


Memory Commander Does Windows 

V Communications is now shipping a Windows 3.0-com- 
patible version of their 386/486 memory manager. A single 
copy of Memory Commander now provides memory 
management services for both DOS and Windows applica¬ 
tions. Memory Commander handles EMS and XMS emulation 
and is compatible with Virtual Control Program Interface, Vir¬ 
tual DMA Specification and Relocated Screen Interface 
Specifications. The product includes an integrated RAM disk 


puter while expanding communications capability. Program¬ 
mers using prior releases of CommLib need change only one 
function call to use the intelligent board or any of the other 
device drivers. 

CommLib Level 2 costs $359 and supports Microsoft C, 
Zortech C++, Turbo C, Turbo C++, Borland C++, Watcom and 
TopSpeed C The library includes complete source code. For 
more information, contact Greenleaf Software, Inc., Bent 
Tree Tower Two, Suite 570,16479 Dallas Parkway, Dallas, 
TX 75248, (800) 523-9830; FAX (214) 248-7830. 


and ANSI driver, both of which run in extended memory in 
order to conserve conventional memory. 

Memory Commander supports 386SX, 386DX and 486 
microprocessors. The Windows 3.0-compatible version of 
Memory Commander costs $99.95. For more information, 
contact V Communications, Inc., 4320 Stevens Creek Blvd, 
Suite 275, San Jose, CA 95128, (800) 648-8266; FAX (408) 
296-4441. 
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Readers' Forum 


We ask that letters with code listings be 
submitted in an ASCII text file on an MS- 
DOS formatted disk. Providing us an 
electronic copy of the code will prevent 
typographical errors that might result 
from optical scanning or re-keyboarding. 


Readers' Forum, 

I have noticed an increasing amount 
of press lately being granted to people 
who claim that BASIC is every bit as 
powerful as Pascal or even C. As one 
who has programmed in numerous lan¬ 
guages for the past 15 years, I feel 
compelled to respond to Ethan Winer’s 
letter in your April 1991 issue. 

Mr. Winer's premise is that you 
should not have bothered to refer a 
previous letter writer to even look at C, 
because BASIC is already all-powerful 
and chock full of features that poor C 
programmers can only dream about at 
night. While loftily holding up his 
Microsoft compiled BASIC to the masses, 
he neglects to point out that anyone 
who wants to incorporate all of those 
features can only do it on only one 
computer - the IBM-PC. 

“Traditional BASIC" is indeed stuck in 
the quagmire of line numbers and 
questionable portability to other com¬ 
puter systems. The only reason 
Microsoft BASIC and its direct com¬ 
petitors support modular, structured 
programming is that it was engineered 
back into the language from Pascal and 
other more powerful languages. 

I have been able to port C applica¬ 
tions from my PC to my Macintosh and 
to a Unix machine with a minimum of 
effort. Unless Microsoft has a compiler 
for the machine, I’m pretty much out of 
luck with a BASIC program. Even if there 
is a compiler, there is no guarantee of 
compatibility. When I ported a serious 
Microsoft BASIC application from a PC to 
a Mac last year, I had to do consider¬ 
able rewriting to consider the different 
machines that they compiled underl 

The first listing example given in the 
letter was a statement to commence 
communication to a serial port: 

OPEN "C0M1:9600,N,8,1" 


We are then asked how much effort it 
would take to do the same in C. Well, 
in a serial package we sell, we use the 
lines: 

comopen (C0M1,RECINT); 
comset (9600,'N',8,1); 

Sure, it's another line, but the 
capabilities far exceed the Microsoft ex¬ 
ample. It also implicitly answers ques¬ 
tions that BASIC doesn't bother to ad¬ 
dress. How is flow control handled? We 
can configure it. What size comm buf¬ 
fers do we use? Also configurable, what 
happens if I want to talk to a gateway 
card instead of a COM port? To get 
anywhere near the same capabilities 
the BASIC programmer would either 
have to resort to PEEK and POKE state¬ 
ments (ah, what a luxury!), or he would 
have to - gasp! - get a comm library! 

It may surprise Mr. Winer that high- 
order languages such as C and Fortran 
are frequently used to create operating 
systems. A sizable portion of Unix is 
written in C, and while it does consume 
large amounts of memory and disk 
storage, that is an aspect of the operat¬ 
ing system, not the language that it is 
written in. Converting Unix to assembly 
would not buy any significant ad¬ 
vantage in system requirements. Heck, I 
could probably design a good operating 
system in BASIC, but the PEEK and POKE 
statements would outnumber all the 
other statements in the listing! I would 
like to think we have come a longer 
way than that. 

I did not learn C 10 years ago just so 
I could take a backseat to BASIC 
programmers. But I would certainly 
think that programmers should sit up 
and find out why C is by far the most 
popular programming language in the 
world. BASIC certainly has its place, and 
I wouldn't dream of taking Microsoft 
BASIC away from Mr. Winer, but anyone 
who claims it to be the premiere lan¬ 
guage needs to start getting a little 
more exposure to languages like Pascal, 
C, and particularly C++. 

On the whole, I found Robert Ward's 
advice to the writer in the February 


1991 issue sound and accurate. Al¬ 
though it may take a little more time to 
master, there is no other language that 
delivers the power, flexibility and por¬ 
tability that C and its extension, C++ 
provide. 

Sincerely, 

Hal S. Crawford 
Crawford Consulting 
1690 Oak Grove Road 
Decatur, GA 30033 

Sometimes I think the age-old 
debate on languages is a bit mis¬ 
directed. All the talk about which lan¬ 
guage can do what ignores the fact 
that languages can't do anything - 
programmers can. You lock a gung-ho 
programmer in a room with an XT and 
software consisting of COM¬ 
MAND. COM and DEBUG, and I bet 
that two years later that XT has a GUI 
written in a language we've never 
heard of. 

Speaking of languages we've never 
heard of, a new one called Liana is in 
the works. It should be of interest to 
anyone comparing BASIC and C. 
Liana has a syntax like C and C++, 
but many of the advantages of BASIC 
(automatic memory management, data 
types are optional, and so on). Better, 
Liana makes it very easy to write Win¬ 
dows applications. Maybe it will turn 
out to be something BASIC and C 
programmers can agree on. -rib 


To the Editor: 

The program APPENV, which ap¬ 
peared as Listing 3 in the February TECH 
Tips, contains an error. 

After the comment 

/* If they matched, ... 

appears the code 
if (!*v) { 


However, in the case of a mismatch, 
this test could still succeed. Perhaps the 
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author overlooked that v is incre¬ 
mented after a mismatch. 

This bug appears when appending to 
an environment variable whose name is 
the beginning of the name of an exist¬ 
ing environment variable. For example, 
if 

ACADXMEM=none 

is in the environment, and the com¬ 
mand is given 

APPENV ACAD=;C:\ACAD\SAMPLES 

then this code notes that the X in 
ACADXMEM is different from the = in 
ACAD=, but then v is incremented to 
point to the null character after the = in 


ACAD= ( in varbuf). The resulting en¬ 
vironment is not as intended. 

Sincerely, 

Walter Mendenhall 
4900 Wright Bridge Rd. 

Cummings, GA 30130 

Sounds like you found this bug the 
hard way. If you ran some software 
metrics on this program, the 
cyclomatic complexity of main () would 
tell you to look for bugs there. This 
code exemplifies the main strength 
and weakness of C syntax: C allows 
you to write very concise code and 
such code can be difficult to verify. 
Personally, I would break the function 
up and reduce the complexity. I will 


go out on a limb and say that the bug 
can be removed by replacing: 

while((*e++ «* *v++) && (*v)); 

with 

while(*v && (*e — *v)) 

++e, ++v; 

Thanks for reporting this bug. -rib 


Some comments about IDE/E8DI drives. 

As soon as prices stablize (after the 
AMD chip is in production and Intel has 
made the inevitable price reductions) I 
am going to buy a “high end” 80486/33 
computer. (Yes, I believe that the price 
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MULTITASKING MSDOS 


Is your program scanning for 
keystrokes or other I/O events while 
analyzing data or displaying graphics? 

Convert your C program to a multitasked system 
overnight and simplify your job. IXOS, an 
MSDOS extension, converts functions into 
independent tasks for R/T and industrial control 
environments. 

80x86,80x87 & EMM support. Intertask 
messages and control. Preemptive scheduling. 
Selectable time slice periods. DOS critical error, 
Ctrl-C, Ctrl-Break handler. Divide by zero and 
80x87 exceptions stop offending task but not 
program. 

$ 100 . 

Schneider Software Systems 

3430 List Place #1006 
Minneapolis, MN 55416 
612-926-7979 

□ Request 349 on Reader Service Card □ 


Soffit 

?r< 



Disk duplication 
All formats 

EVERLOCK copy protection 
Label/sleeve printing 
Full packaging services 
Warehousing 
Drop shipping 
Fulfillment 
48-hour delivery 
Consultation & guidance 




Star-Byte, Inc. 

2880 Bergey Rd Hatfield. PA 19440 


800 - 243-1515 


□ Request 327 on Reader Service Card □ 


Instant 

Microcontroller 



Instant C Programming 

Don't use a microprocessor, use a SmartBlock™ 
microcontroller module to build your custom 
controller. Our low cost Dynamic C™ makes 
programming a snap. 3.5 x 2.5 inch module 
includes microprocessor, memory, time/date 
clock, eeprom, watchdog, serial ports and more. 
As low as $59 in quantity. The efficiency of a 
custom design without the headaches. 


PostScript TSRs - Under 9K 
PSFX 3.0 TSR prints formatted output 
intended for Epson or IBM ProPrinter in 
PostScript. See Epson fonts, graphics, 
accents and boxes! Print portrait or land¬ 
scape, sizes up to 1 1x17. PostScript 
driver for databases, accounting. $85 

PSFXnet Novell NetWare version adds 
banner pages and keeps statistics on pages 
printed by user. $99 

EPScreen Captures PC screens as tiny 
Encapsulated PostScript (EPS) files, 
ready for manuals, frames optional. Font 
included. Color files less than 10 K. $95 


Notice to TS Subscribers 

Occasionally, TECH Specialist makes 
its mailing list available to vendors of 
products we think our readers will find in¬ 
teresting. Current subscribers receive free 
information in the mail from these ven¬ 
dors. If you prefer that your name not be 
used in these mailings, please let us know. 
Just copy or clip this form and send it with 
your name and address to: 


Z-World Engineering 

1340 Coveil Blvd., Davis, CA 95616 USA 

Tel: (916) 753-3722 

Regular Fax: (916) 753-5141 
Automatic Fax: (916)-753-0618 
(Call from your fax, hear computer voice, use 
touchtone dial to request desired data sheets.) 

□ Request 279 on Reader Service Card □ 


Legend Communications, Inc. 

54 Rosedale Avenue West 
Brampton, ON, Canada L6X 1K1 
30 day guarantee 

(416)450-1010 (800)668-7077 

Recommended by QMS, GCC, OC’fi. 


□ Request 191 on Reader Service Card □ 
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of the 80486/33 chip will come down - 
in part because of the new AND chip 
putting pressure on Intel, and in part 
because of Intel's new 80486/50 causing 
realignment of price-points) 

While the IDE drive has the potential 
to be faster than ESDI (at least accord¬ 
ing to what I read), I believe that the 
fastest drive system I can purchase 
today is an ESDI with a caching control¬ 
ler. According to what I read in adver¬ 
tisements, a 210M IDE drive (the largest 
I have seen advertised) costs me 
"about” $800 - which means a total of 
$2,400 to roughly match the 650N ESDI 
drive I plan to purchase, if I am even 
able to configure IDE adapters to run 
three IDE drives. For that same $2,400 I 
will be able to buy a 650M ESDI drive 


and a caching controller with 4Meg of 
cache RAM installed. I don't think IDE 
will be able to match the performance 
of this system before I am ready to buy 
(November or December of this year). 

I realize this is not a “typical” drive 
system - but I have used PCs since 
1982 and have seen just how fast a 
hard disk fills up, especially with today’s 
GUI programs (I was amazed when I 
went to install Borland C++ 2.0 and it 
took 15 megabytes!II). If the price of 
IDE drives falls I might change my plans, 
but I would also have to be able to buy 
a caching IDE adapter card. I have pret¬ 
ty much decided to buy an ISA bus 
motherboard, due to the extra $1,000 
or so an EISA design would cost me, 
and the fact that I will get plenty of 


single-user performance out of the ISA 
bus. (Norton SI of 51+ should keep me 
happy for awhile) 

I have read articles about 486/33 
chips which have been “pushed" to run 
at 50MHz by using a heat sink bonded 
to the chip. I have no intention of trying 
to “push” the 486/33 I buy (do not want 
to void my warranty) but it does seem 
to me that adding a heat sink to a 
486/33 would make the chip run cooler 
and longer. 

Does this seem like a good idea to 
you? 

Tom Smith 
Mail Stop AISH 
PO Box 3621 
Portland, OR 97208 


UPPER DECK EDITOR 

FOR WINDOWS 3.0 

A FAST, flexible, and robust text 
editor designed for the Windows 
environment. Edits files larger than 
64K. Regular expressions, search 
across multiple files, full 300-level 
UNDO, Windows clipboard sup¬ 
port, keyboard macros. Fully cus¬ 
tomizable. Introductory price $75 
plus $5 S/H (outside USA $15). CA 
residents please add sales tax. 30- 
day money-back guarantee. 

Upper Deck Systems 
P.O.Box 2751 
Escondido, CA 92033 
_ (619) 741-1075 _ 

□ Request 350 on Reader Service Card □ 


THE CD-10M 
DEVELOPER'S LAB" 


Comprehensive CD-ROM multimedia 
production resource for PC ond Apple 
developers. Proven design, management, 
data prep programming, premastering 
and manufacturing techniques. Important 
specs from leading companies. Demos of 
off-the-self tools for imaging, audio and animation. 
Sample applications demonstrate the power of 
our source tools in C, Turbo Pascal. 

PC or MAC.@ $395.00; 
Transportable version @ $425.00, 
Visa/MC accepted. 

SOFTWARE MART, INC. 

3933 Spicewood Springs Rd., Suite [-100 
Austin, Texas 78759 
(512) 346-7887 FAX: (512) 346-1393 


□ Request 310 on Reader Service Card □ 


CHOICE INSTALL 

The BEST choice to install your 
product. Only one license fee for all 
of your products and all of the 
features you want including auto 
configuration, error handling, more. 

$149 plus shipping, demo disk $5. 
Source code +$100. Requires C 
Compiler (Microsoft, Zortech or Bor¬ 
land). Use it successfully or we’ll 
refund your money with no hassle. 
Order today, use it tomorrow, ship 
your product the day after. 

ChoiceWare 

8802 E. Broadway #211 

Tucson, AZ 85710 

(602)298-0666 

□ Ftequest 347 on Reader Service Card □ 




Great Graphics 
for Scientists and 
Engineers! 
FORTRAN, C, 
QuickBASIC, and 
Pascal. 


Source code. 
No royalties. 

$350 


INGRAF 


Over 100 routines 
give you complete 
control of axes, 
scaling, windows, 
and more 

Sutrasoft 

10506 Permian Or. 

Sugar Land, TX 77478 

Info: (713) 491-2088 

Orders 

(FAX): 713-240-6883 


supports video, printers, and plotters 


□ Request 286 on Reader Service Card □ 


Object Comm 


Object Comm is a library of OOP async tools for 
Turbo Pascal 5.5/6.0. Each class is a "layer" that 
can be used alone, or with other layers to form 
OSI-style protocol stacks. Release 1.5 includes: 


• ComPort: A UART-level async interface layer. 
Interrupt driven. Supports the 16550 buffered 
UART. 115Kbps. Supports any UART 
address/interrupt. Shared interrupts. Flow control. 
Supports unlimited active ComPort layers. 


• File transfer layers: Zmodem, Xmodem, 
Ymodem (Crc, lk, G variants), ASCII. 


• ComTrace: a port-level protocol analyzer. Uses 
two serial ports to display activity on any 
asyncronous data link. 


• Multiplexed data streams, error correcting data 
transport break-out layer, printer interface layers. 
ANSI Terminal interface. CRC calculations, 
generic ring-buffering, example programs, and 
many other goodies are included. 

$60 Includes complete, royalty-free Pascal and 
assembler source code. Manual. Free technical 
support from the developers. Of course there's a 
3u-aay money back guarantee! 


MC/VISA/Info: (616) 471-5571 


HIP SYCAMORE 


M ICROSYSTEMS 


□ Request 353 on Reader Service Card □ 


The Make You’ve Been 
Waiting Fori 

Programmer'sSUPER-MAINT<‘+ ™ 

The ‘easier’ make utility 

SUPER-MATST builds your make and 
response files, remembers your 
command flags, the make file name, 
and more!. SUPER-MAINT works for 
you so you can focus where you need 
to: on your programming! Still only $55 
(2.50 s&h, NY residents add sales tax). 
Supports MS, Borland, Mix languages + More 

EmmaSoft 
PO Box 238 
Lansing, NY 14882 

Voice: (607)533-4685 
BBS:(607)533-7072 

CD ED 

□ Request 352 on Reader Service Card □ 
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I'm not about to comment on your 
choice of hardware configuration. 
Buying computer hardware is like 
buying audiophile equipment. No mat¬ 
ter what you buy, you will run into 
someone a week later who got a bet¬ 
ter deal on better equipment. I will 
point out that most IDE drives in my 
neck of the woods come with at least 
some cache memory. My 140Mb IDE 
has a 32Kb cache. I don't know if you 
can get an IDE controller that will drive 
three drives; mine will only drive two. 

As far as pasting a heat sink on 
your CPU, I wouldn’t bother. Either 
your PC keeps the CPU within its 
tolerances or it doesn't. If it doesn't, 
you're going to have many other 
problems. If you really want the extra 


3 WAYS TO 
ELIMINATE 
CODE LISTING 
ERRORS 

1. Buy TECH Specialist 
magazine listings each 
month-they're already 
on disk. Just send us 
$5 and ask for the code 
by issue number-you’ll 
receive one month of 
error-free listings. 

2. Ask for the 1990 
TECH Specialist complete 
code disk. For only $12 
you’ll get 7 months of 
error-free code. 

3. Order a full year of 
code listings for $30. 

We'll send you a code 
disk every month—so 
you get all the TECH 
Specialist code for 12 
months—error-free, 
hassle free! 

Why wait? Order 
today! Call: 

913 - 841-1631 

or write: 

specialist_ 

2601 Iowa Street 
Lawrence, KS 66046 


peace of mind, at least wait until the 
last months of your warranty before 
you stick the sink on — hardware ven¬ 
dors sometimes get real excited if they 
open the cover on a dead PC and see 
anything that looks homebrew! -rib 


Dear Mr. Ward: 

Regarding my subscription to TECH 
Specialist, my check is going out today! 
I enjoy the magazine. One comment 
perhaps: I would like to see more book 
reviews. Currently, I am trying to find a 
substitute for the IBM AT Technical Ref¬ 
erence Manual - it is rather expensive. 
The bibliography in MS-DOS Systems 
Programming is good. A similar one for 
hardware would be of great help. 


Regards, 


David Jones 
Pyrrhus Software 
142 Parker St. 
Pittsburgh, PA 15223 


I don't know of a complete sub¬ 
stitute for the IBM manual, but I will 
keep an eye out. I’m with you on 
having more book reviews and my 
goal is to have one book review in 
each issue. I hope to achieve that goal 
in a few more months, but we could 
use some help. If you’ve picked up a 
PC-specific book recently that is worth 
knowing about, please send us a 
proposal. Book reviews are not all that 
hard to write, once you’ve read the 
book. Thanks for the feedback, -rib 
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Write Multitasking DOS Programs with 
Conquerrent C Function Library 

• Execute up to 16 C functions concur¬ 
rently within one program. 

• Great for real-time, data acquisition, 
clock displays, background printing, 
simulation, process control, games. 

• Transparent reentrancy protection for 
most library functions. 

• Flexible stack location and size man¬ 
agement for each task. 

• All memory models supported in 
Turbo and Microsoft C on DOS 80x86 
PCs. 

• 4K to 12K overhead. 

• $99 complete, no royalties, 30 day sat- 

isfaction guarantee. _ 

Available from: 

Interstitial Software Systems 
321 E. Buckingham Rd., Ste. 140 

Garland, TX 75040 _ 

□ Request 313 on Reader Service Card □ 



Developer’s 

Office Management Software 


ipunoiy fyicnjanpojfi xnJJo uno £ tunj^ 

Easy to use computerized system to organize, operate 
and control your software business. Written for DOS 
and DESQview API. The Developer"a Assistant also 
works with Windows and Software Carousel. 


Major features: 


Other features Affordable" 


User and Dealer indexed database 
“Bug" look-up DB for software support 


Superb invoicing capabilities 


Utilities i.e., serial # embedding program 
Directory of packagers, suppliers, etc. 

Directory for product releases 
Lots of reports and other features 
Supports both laser and dotmatrix printers 
Free 900 « number to support your software 
Built-in calculator, phone dialer, other accessories 


Powerful • Integrated • Versatile • Slick 

(512)834-8927 $129. 00 


(VISA/MasterCard/AMEX accepted) 


S.L.A.M. Software 
3202 W. Anderson Ln. Ste. 208-176 
Austin, TX 78757-1022 


□ Request 293 on Reader Service Card □ 


Opt-Tech Sort/Merge 


Extremely fast Sort / Merge / 
Select utility. Run as an MS- 
DOS command or CALL as a 
subroutine. 

Supports most languages and 
filetypes including Btrieve and 
dBase. Unlimited filesizes, mul¬ 
tiple keys and much more! 

MS-DOS $149. 

OS/2, UNIX $249. 


Opt-Tech Data Processing 

P. O. Box 678 
Zephyr Cove. NV 89448 

(702) 588-3737 


□ Request 127 on Reader Service Card □ 
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Dear Editor: 

May I suggest DMA as a topic for 
one of your future articles? In particular, 
with two DMA controllers in my 386AT, 
why can't I do direct memory-to- 
memory block transfers using the 
capabilities of these 8237 chips? And 
how should the two chips be 
programmed to cooperate properly, in 
view of their cascaded relationship? A 
short assembly language code frag¬ 
ment, using the specific port-addresses 
employed in the AT, would be immen¬ 
sely enlightening. 

Sincerely, 

Allan Cruse 


Great idea! I would be happy to get 
an article from some DMA expert out 
there. Larry Widing's article in the April 
issue showed how to do DMA from 
the floppy drive, but the DMA chip was 
not the focus. I suspect that program¬ 
ming the chip is a lot easier than deal¬ 
ing with all the side effects. For ex¬ 
ample, who arbitrates use of the DMA 
controller in multitasking environments 
like Windows? Anyone care to take on 
a DMA article? -rib 


Comments: 

I have three questions I hope you 
can help me with: 


1) Does ISA (which I believe stands 
for Industry Standard Architecture) refer 
to the IBM PC bus? 

2) Is there any standard for the IBM 
PC bus and if so what is the source of 
it? 

3) I have seen several devices for 
sale which use the parallel port for 
bidirectional I/O. I believe the parallel 
port provides for output only. Have you 
ever published an article describing 
how this is done? 

Thank you in advance for your help. 

Scott Alexander 
SBS Engineering, Inc. 

5550 Midway Park Place, NE 
Albuquerque, NM 87109 


32-bit Protected Mode 
386 C Graphics Library 

Intel 386/486 C Code Builder, 
MicroWay, Watcom & Zortech 
with Phar Lap 3861 ASM 
Mixed Raster/Vector, 
Scalable, Rotatable Font, 
Viewports, Global Scaling 
VGA, SVGA, 8514/A, VESA, 
Hercules Graphics Station 
through 1024x768x256 (8-bit), 
640x480x32k (16-bit), 
512x480x16.7m (32-bit), 
WYSIWYG HP-GL7 PostScript 
$200 NO ROYALTIES 
FULL SOURCE CODE 
Gary R. Olhoeft 
P.O. Box 10870 Edgemont 
Golden, CO 80401-0620 
(303) 279-6345 or 877-3697 

□ Request 294 on Reader Service Card □ 


TUB ™ is FASTEST! 



RCS™ 4.2 PVCS™ 1116’“ 3.0 TUB™ 5.0 


Times are lo update a 45K library on a PC/XT. PVCS and TUB 3.0 are 
from Sept 87 PC Tech Journal. MKS RCS 4.2 and TUB 5.0 are newer 

TUB™ is BEST! 

“Do not be fooled by the fact that this is the 
least expensive of the five packages reviewed 
here - TUB has features and power to spare" 
John Rex, Computer Language 
“TUB is a great system" J. Vallino, PC Tech J 

• Full-Featured Version Control for Software 
Professionals. Check-in/out locking. Branching. 
Keywords. Wildcard and list-of-tile support. Can 
merge parallel changes and undo intermediate 
revisions. Network and WORM support. Main¬ 
frame compatible deltas for Pansophic, ADR, IBM, 
etc.. Integrates with Opus™ MAKE & Slick™ MAKE. 

MS-DOS $139, OS/2 $195+ shipping visa/Mc 
5 station LAN license $419 (OS/2 $595), call for other sizes 

BURTON SYSTEMS SOFTWARE 

PO Box 4156, Cary, NC 27519 (919)233-8128 

□ Request 137 on Reader Service Card □ 
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Your insider’s guide 
to the UNIX industry 

□ industry news 

□ market analyses 

□ unbiased, in-depth system 
and software reviews 

Call (913)841-1631 

Only $79 for a full year of the 
most complete insider newsletter 
on UNIX and Xenix. 


y wquE 


2601 Iowa St. 
Lawrence, KS 66046 
FAX (913) 841-2624 


Why you want BATCOM! 

BATCOM is a batch file compiler 
that compiles your ".bat" files to 
".exe" files to make them faster, more 
professional, and more capa¬ 
ble. BATCOM extends DOS with new 
commands so you can read keyboard 
input, perform arithmetic, use subrou¬ 
tines, and much more all from within 
compiled batch files. In addition to 
speeding your batch files and adding 
new commands, BATCOM protects 
your source code, and you can dis¬ 
tribute your compiled programs with 
no royalties. For IBM PC. $59.95. 

y~*\ Wenham Software Co. 

| • 1 5 Burley St. 

Wenham, Ma. 01984 
(508)-774-7036 

□ Request 153 on Reader Service Card □ 


If Your App Never Swaps, 
Stop Reading This Ad 


□ Request 280 on Reader Service Card □ 


□ Request 322 on Reader Service Card □ 


However, if you are beset by other apps stealing your memory, or by 
real mode users, then your app occasionally crawls because of disk 
thrashing There simply isn't enough memory to run comfortably, 
even with virtual memory and object caching. 

If this sounds familiar then you need SegMentor “. it optimizes your 
segmentation map so your app screams even when your user's 
memory is scarce. 

SegMentor * traces the entry point exit point, and timing data for 
absolutely every one of your functions in a typical runtime session(s). * 
Then, it employes powerful algorithms, like those for auto-routing 
printed circuit boards, to explore the solution space for an optimal 
segmentation map. You get a more compact app with the fewest 
inter-segment (disk thrashing) calls. We even put the pragma directives 
for this new map in an include file for easy linking back into your code 

Sm feature article In March 1991 Microsoft Systems Journal fpg 49) 

•If tins profiling looks illuminating compared to your statistical analyzers and source 
code filters, call for more information on Performance Tracer . it gives you a 
precise ana complete view of exactly what occurs inyour app at runtime—call trees, 
object sizes, call counts, function times, etc 

MicroQuill 

Performance Tuning Tools 

4900 25th Avenue NE *206 ■ Seattle, WA 98105 
Toll free 1 -800-441 *7822 206-525-8218 FAX 206-525-8309 


BGI PRINTER DRIVERS 

Hardcopy drivers for the Borland BGI 
graphics interface with full source! 

The BGI Printer Driver Toolkit provides BGI 
printer drivers for Epson 9 & 24 pin dot matrix, 
HP LaserJet II, and HP PaintJet printers. Use 
the BGI graphics interface to effortlessly 
generate high resolution hardcopy with Turbo 
C, C++, and Turbo Pascal. Full driver source 
provided lor your tutorial pleasure. $89.95 . 

PC TIMER TOOLS 

Over 60 functions implement microsecond 
resolution timing, precision delays, extensive 
interrupt profiling, and full timer tick interrupt 
management. Supports TC, TC++, TP, and 
MSC. Full library source included. $49.95 

Prices postpaid USA, elsewhere add $4.00. 
VISA and MasterCard accepted. 

RYI p PO Box 22 

Mt. Pleasant, Ml 48804 
DESIGN 517-773-0587 


TECH Specialist - Page 79 






























Advertiser Index 


Advertiser.Reader Service # Page # 

Annabooks .112 .. .29 

Asymetrix .351_5 

Austin Code Works.332 1 

Blaise Computing.106-9 

Borland International .337 3 

Burton Systems Software .... 137 .. .79 

C.C. Software.339 .. .70 

CNS, Inc.354 ... .9 

ChoiceWare .347 .. .77 

Copia International Ltd.** .. .26 

Courseware Applications _193 ... 28 

db Technology .316 ... 13 

Distinct Corp.336 .. .70 

Dr. MD.328 .. .36 

EmmaSoft.352 ... 77 

Gimpel Software .** ...25 

HILCO Software.282 .. .48 


Advertiser.Reader Service # Page # 


ITI Logiciel.** ...15 

Information Modes. 295 ... 53 

Interstitial Software Systems . 313 ... 78 

KADAK Products Ltd. 302 ... 21 

Knowledge Dynamics Corp. .. 103 .. .C3 

Legend Communications-191 ... 76 

Magna Carta Software .145 ... 44 

Micro Quill. 322 ... 79 

Modular Software Systems ... 186 ... 49 

Gary R. Olhoeft. 294 ... 79 

Opt-Tech Data Processing ... 127 ... 78 

Pathfinder Associates .158 ... 50 

Quantasm Corporation.291 ... 31 

Quarterdeck Office Systems .. 172 .. .C4 

QuickByte Software. 326 ... 50 

Ryle Design . 280 ... 79 

SET Labs, Inc.121 ... 61 

S.L.A.M. Software. 293 ... 78 


** This advertiser prefers to be contacted directly 


Advertiser.Reader Service # Page # 

Schneider Software Systems . 349 ... 76 

Software Mart .310 ... 77 

Softway Inc.125 ... 35 

South Mountain Software ... 317_6 

Star-Byte, Inc. 327 ... 76 

Sutrasoft. 286 ... 77 

Sycamore Microsystems. 353 ... 77 

The Symmetry Group. 333 ... 63 

TEGL Systems Corporation . 346 ... 39 

Tri-Technology Systems, Inc.. 329 ... 44 

Turbo Power . 348 ... 46 

Upper Deck Systems . 350 ... 77 

V Communications.**...11 

Vermont Creative Software .. 331.. .C2 

Wenham Software Co.153 ... 79 

Western Wares . 284 ... 53 

Z-World. 279 ... 76 


UNIQUE—your insider’s guide 
to the UNIX industry ' 


Every month Unique brings you: 

□ industry news and gossip 

□ market analyses 

□ unbiased, in-depth system and 
software reviews 

□ information on new startups and 
products 

Call (913) 841-1631 for your subscription. 
You’ll pay only $79 for a full year of the 
most complete insider news in 
UNIX and Xenix. 

R&D Publications, Inc. 

2601 Iowa St. 

Lawrence, KS 66046 
(913) 841-1631 
FAX: (913) 841-2624 


Is your product 
special? 

Is it so special only a 
programmer can 
understand it? 

Then advertise in 


the journal for programming specialists. 

Call (913)841-1631 today 

to reserve space 
for your ad. 

Ask for Jeff (Western Region), 
Donna (Midwestern Region), 
or Ed (Eastern Region) 
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specialist 


Page 80 - TECH Specialist 


July 1991 































































2601 Iowa St. 
Lawrence, KS 66046 
(913) 841 -1631 FAX: (913) 841 -2624 


FREE 

Product 
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Use this postage paid 
card to stay up to date 
on products 
that affect 
your productivity. 
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the right and 
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Please help us serve you by 
answering the following: 


1) I program: 

□ for a living 

□ as a hobby 

□ as a manager 


2) I program in: 

□ MS-DOS 

□ Macintosh 

□ Xenix/UNIX 


3) I program most frequently in: 

□ Assembly □ BASIC 

□ Pascal □ C 

□ Other_ 

□ Please send me subscription 
information. 
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COMPUTER 

LANGUAGE 

EEZED 


BAT 


FIRST IMPRESSIONS LAST. 

INSTALL 3,0 GIVES YOUR SOFTWARE PRODUCT 
A PROFESSIONAL INTRODUCTION. 


Installation procedures that rely on 
batch files and DOS commands not 
only look amateurish but also have 
limited error handling capabilities. 
Today's users expect quality and ease 
of use from software — beginning the 
moment they open the package. A 
smooth, professional installation 
makes an important first impression. 

EVERYTHING YOU NEED 

INSTALL 3.0 is customized for your 
product with an ASCII text file called 
a "script file." INSTALL 3.0 comes 
with many sample script files that you 
can modify and use immediately. No 
programming is necessary to create 
most installations. However, C source 
code is included for your convenience 
and technical support is free. 

FAST AND SIMPLE 

Use INSTALL 3.0 to create an elegant 
installation procedure that will 
increase users' confidence in your 
product. INSTALL 3.0 takes advan¬ 
tage of available RAM for lightning- 
fast file transfers. All your documen¬ 
tation has to tell users is TYPE 
"A: INSTALL". 


INSTALL PRO 

• Builds distribution disk sets 
automatically 

• Creates a configuration file, 
containing all parameters for 
each disk set 

• Automatically builds INSTALL 
script files 

• Automatically formats disks 
(360K, 720K, 1.2M, 1.44M) 

• Uses a full screen, point-and- 
shoot interface for fast, efficient 
file tagging 

• Automatically splits large files 
across multiple diskettes 

• Literally cuts distribution disk 
building time from days to 
minutes for complex products 


KNOWLEDGE DYNAMICS 
CORPORATION 

Highway Contract 4, Box 185-H 
Canyon Lake, Texas (USA) 
78133-3508 

□ Request 103 on Reader Service Card □ 


PROVEN RELIABILITY 

INSTALL 3.0 has been used for over 
four years by some of the biggest (and 
smallest!) names in the industry, in 
the U.S. and abroad, to install millions 
of copies of their programs. Add your 
name to the list today. 

30 DAY MONEY-BACK 
GUARANTEE 

Free technical support. No royalties. 

MasterCard/VISA/COD/POs 

welcome. 

$399.95 INSTALL PRO 
$249.95 INSTALL 3.0 
$99.95 International Option 
$99.95 OS/2 Option 

SALES 

1/800-331-2783 ext. #0194 

International 
1/512-964-3994 
24 hour FAX 1 /512-964-3958 
24 hour BBS 1/512-964-3929 

CALL OR FAX BY NOON 
AND RECEIVE INSTALL 3.0 
TOMORROW! 










Platform Transparency. 
Distributed Workflow. 
Real WYSIWYG Type. 
X-Windows. 
Extended DOS. 
VCPI. 

Margaritas by the sea. 


It's just another beautiful day at the Quarterdeck API Conference. 

Attend our Fourth Annual API Conference for DESQview and DESQview/X 
developers and users. August 19-23 in Santa Monica, California. Join major corp¬ 
orations, VARs and developers in learning how to boost user productivity while 
saving big bucks. Hurry. Call or write today. The conference is filling up fast! 

Quarterdeck Office Systems, 150 Pico Blvd., Santa Monica, CA 90405 
(213) 392-9851 Fax (213) 399-3802 
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